Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > microsoft.public.excel.programming > #110606

Re: Check how date is entered

From GS <gs@v.invalid>
Newsgroups microsoft.public.excel.programming
Subject Re: Check how date is entered
Date 2018-05-04 17:37 -0400
Organization A noiseless patient Spider
Message-ID <pcijrp$9mi$1@dont-email.me> (permalink)
References <073d347c-a7b6-4718-94a4-d9fe2d6d2822@googlegroups.com> <pchkn6$djt$1@gioia.aioe.org> <XnsA8D85AD7379auricauricauricauric@85.214.115.223> <pci64r$1d5a$1@gioia.aioe.org>

Show all headers | View raw

> On 5/4/2018 10:55 AM, Auric__ wrote:
>> dpb wrote:
>> 
>>> On 5/4/2018 2:31 AM, jan120253@gmail.com wrote:
>>>> Is there anyway to check with VBA if a date is entered as DD-MM-YY or
>>>> MM-DD-YY?
>>>>
>>>> How can I tell using VBA if 4-5-18 is actually 4th of May of Fifth of
>>>> April?
>>>
>>> If that's all you have in isolation you can't...if there are a string of
>>> dates such that can find a value >12 in the (presumed) month field then
>>> you can make the presumption that's days and the other must be months
>>> but without some additional hints or such a specific day that can be
>>> recognized there's just insufficient data to be unequivocal.
>> 
>> On the other hand, if the cell is properly formatted as a date, you can 
>> check
>> the NumberFormat property:
>> 
>>    Dim tmp As Variant
>>    tmp = Split(ActiveCell.NumberFormat, "/")
>>    If UBound(tmp) > 0 Then
>>      Select Case LCase(tmp(0))
>>        Case "d", "dd", "ddd", "dddd"
>>          'd/m/y
>>        Case "m", "mm", "mmm", "mmmm", "mmmmm"
>>          'm/d/y
>>        Case Else
>>          'not formatted as date
>>      End Select
>>    End If
>> 
>
> But if the cell is formatted as Date and contains the data, then it will 
> already be interpreted as whichever and all need to do is =MONTH() or =DAY() 
> and inspect return value to know...
>
> Didn't seem as that was the OP's question/problem at least way it came across 
> to my reading...guess we'll say if comes back to amplify.

Hmm.., I rather like Auric's simplified solution since it indeed does EXACTLY 
what I interpret the OP is looking to accomplish.

Note also that Excel uses the 'system' date format unless set otherwise for 
specific cells. For example, after XP the format order for d/m got switched.

-- 
Garry

Free usenet access at http://www.eternal-september.org
Classic VB Users Regroup!
  comp.lang.basic.visual.misc
  microsoft.public.vb.general.discussion

Back to microsoft.public.excel.programming | Previous | Next — Previous in thread | Next in thread | Find similar | Unroll thread

Thread

Check how date is entered jan120253@gmail.com - 2018-05-04 00:31 -0700
  Re: Check how date is entered dpb <none@none.net> - 2018-05-04 07:46 -0500
    Re: Check how date is entered "Auric__" <not.my.real@email.address> - 2018-05-04 15:55 +0000
      Re: Check how date is entered dpb <none@none.net> - 2018-05-04 12:43 -0500
        Re: Check how date is entered GS <gs@v.invalid> - 2018-05-04 17:37 -0400
          Re: Check how date is entered dpb <none@none.net> - 2018-05-04 18:49 -0500
            Re: Check how date is entered GS <gs@v.invalid> - 2018-05-04 21:42 -0400
              Re: Check how date is entered dpb <none@none.net> - 2018-05-04 23:46 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-05 04:21 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-05 07:21 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-05 09:50 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-05 09:05 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-05 10:33 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-05 10:57 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-05 20:51 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-05 11:32 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-05 21:19 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-06 07:46 -0500
                Re: Check how date is entered dpb <none@none.net> - 2018-05-06 09:37 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-06 20:37 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-06 19:53 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-06 21:03 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-07 00:06 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-07 03:14 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-07 07:45 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-07 13:06 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-07 13:53 -0500
                Re: Check how date is entered malone <malone@nospam.net.nz> - 2018-05-08 08:19 +1200
                Re: Check how date is entered dpb <none@none.net> - 2018-05-07 15:35 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-07 17:38 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-07 17:26 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-08 00:19 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-08 01:31 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-08 07:45 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-08 09:45 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-08 14:34 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-08 14:09 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-08 17:06 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-08 13:48 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-08 15:02 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-08 14:59 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-08 17:04 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-08 18:53 -0500
                Re: Check how date is entered dpb <none@none.net> - 2018-05-08 21:12 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-08 23:51 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-09 07:20 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-09 11:32 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-09 11:35 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-09 15:03 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-09 15:18 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-07 13:34 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-07 13:44 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-07 17:40 -0400
                Re: Check how date is entered dpb <none@none.net> - 2018-05-07 17:50 -0500
                Re: Check how date is entered GS <gs@v.invalid> - 2018-05-08 00:02 -0400
  Re: Check how date is entered jan120253@gmail.com - 2018-05-07 01:45 -0700
    Re: Check how date is entered jan120253@gmail.com - 2018-05-07 01:52 -0700
      Re: Check how date is entered dpb <none@none.net> - 2018-05-07 08:16 -0500
        Re: Check how date is entered GS <gs@v.invalid> - 2018-05-07 13:10 -0400
  Re: Check how date is entered Ramon-México <cesaramon@gmail.com> - 2018-05-07 22:03 -0700

csiph-web