View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default Testing for Date Format in VBA/Excel

=Personal.xls!isdate(B17)


Gord Dibben MS Excel MVP

On Wed, 7 Oct 2009 16:56:01 -0700, Hershmab
wrote:



"Tom Ogilvy" wrote:

Use the Vartype function from VBA

See Excel VBA help for details.

--
Regards,
Tom Ogilvy


I want to use this idea to create a UDF function "isdate", but my VBA
knowledge does not seem up to it: I created the following code in a new
module in my Personal.xls:

Public Function isdate(xCell As Range)
If VarType(xCell) = vbDate Then
isdate = True
Else
isdate = False
End If
End Function

I entered the formula "=isdate(B17)" in a cell, but it only returned
"#NAME?", and I did not know how to debug it. What am I doing wrong?