Jak zjistit, zda je v buňce zadané datum? Vyřešeno

[atari]

Potřebuji ve VBA zjistit zda je v buňce datum. Něco ve smyslu:
If Cells(1, 1) = „jakékoliv platné datum“ Then

Datum je vždy ve formátu 19.06.2012.

Poznámka: Dokázal bych to nějak obejít, že bych tu hodnotu v buňce rozložil a otestoval, zda na 4. a 5. pozici je číslo od 1 do 12, to samé s rokem apod. Ale to je ta poslední možnost, kterou bych chtěl řešit.

[Reklama]

[Uziv00]

Ahoj,
VBA sice neumím, ale ve vbs je funkce IsDate(). Příklad:
test = IsDate(MojeDatum) - vrací hodnotu true, nebo false.
Zkus mrknout, jestli to neumí i VBA (jsou si dost podobné).
Příkaz by pak mohl vypadat:
If (IsDate(Cells(1, 1))) Then
Případně If (Not IsDate(Cells(1, 1))) Then

[atari]

Tak VBA má také příkaz IsDate, díky za tip.
Já to hledal v Excelu ve vzorečkách v oddíle "Datum a čas", a tam jsem to nenašel.