Type veld

[Rodolfo]

H.H.

hoe kan ik in excel in een formule met de ALS functie bepalen wat een datum
of tijdcel/veld is?

bvd

Rodolfo

[Ingrid Baplue]

Een datum kan je controleren met volgende functie:

Function isDatum(rng As Range)
Application.Volatile
If rng.Cells.Count > 1 Then
isDatum = CVErr(xlErrRef)
ElseIf IsDate(rng) Then
isDatum = True
Else
isDatum = False
End If
End Function

kopieer de code naar een module:
http://users.pandora.be/ingrid/excel/copyvba.htm#module

Bij het invoeren van een formule in een cel kan je deze functie vinden in de
cetegorie 'Door gebruiker gedefinieerd'. De formule zou er dan zo kunnen
uitzien:

=ALS(isDatum(A1);"datum";"geen datum")
--
Ingrid Baplue
Microsoft MVP - Excel
http://users.pandora.be/ingrid/excel/

Dit bericht is geplaatst in een nieuwsgroep. Post je evt antwoord of
vervolgvraag graag in de nieuwsgroep a.u.b.

Post by Rodolfo
H.H.
hoe kan ik in excel in een formule met de ALS functie bepalen wat een
datum of tijdcel/veld is?
bvd
Rodolfo

[Ingrid Baplue]

En volgende functie kan je gebruiken om tijdwaarden te controleren:

Function isTijd(rng As Range)
Application.Volatile
If rng.Cells.Count > 1 Then
isTijd = CVErr(xlErrRef)
ElseIf IsNumeric(rng) Then
isTijd = False
On Error GoTo einde
isTijd = TimeValue(rng.Text)
isTijd = True
Else
isTijd = False
End If
einde:
End Function
--
Ingrid Baplue
Microsoft MVP - Excel
http://users.pandora.be/ingrid/excel/

Dit bericht is geplaatst in een nieuwsgroep. Post je evt antwoord of
vervolgvraag graag in de nieuwsgroep a.u.b.

Post by Ingrid Baplue
Function isDatum(rng As Range)
Application.Volatile
If rng.Cells.Count > 1 Then
isDatum = CVErr(xlErrRef)
ElseIf IsDate(rng) Then
isDatum = True
Else
isDatum = False
End If
End Function
http://users.pandora.be/ingrid/excel/copyvba.htm#module
Bij het invoeren van een formule in een cel kan je deze functie
vinden in de cetegorie 'Door gebruiker gedefinieerd'. De formule zou
=ALS(isDatum(A1);"datum";"geen datum")

Post by Rodolfo
H.H.
hoe kan ik in excel in een formule met de ALS functie bepalen wat een
datum of tijdcel/veld is?
bvd
Rodolfo

[Rodolfo]

Thanks werkt goed, maar hoe doe ik dit nu voor een tijd veld?

Rodolfo

Post by Ingrid Baplue
Function isDatum(rng As Range)
Application.Volatile
If rng.Cells.Count > 1 Then
isDatum = CVErr(xlErrRef)
ElseIf IsDate(rng) Then
isDatum = True
Else
isDatum = False
End If
End Function
http://users.pandora.be/ingrid/excel/copyvba.htm#module
Bij het invoeren van een formule in een cel kan je deze functie vinden in de
cetegorie 'Door gebruiker gedefinieerd'. De formule zou er dan zo kunnen
=ALS(isDatum(A1);"datum";"geen datum")
--
Ingrid Baplue
Microsoft MVP - Excel
http://users.pandora.be/ingrid/excel/
Dit bericht is geplaatst in een nieuwsgroep. Post je evt antwoord of
vervolgvraag graag in de nieuwsgroep a.u.b.

Post by Rodolfo
H.H.
hoe kan ik in excel in een formule met de ALS functie bepalen wat een
datum of tijdcel/veld is?
bvd
Rodolfo

[Ingrid Baplue]

M'n antwoord van 11:52
http://tinyurl.com/yrggs (Google Groups)
--
Ingrid Baplue
Microsoft MVP - Excel
http://users.pandora.be/ingrid/excel/

Dit bericht is geplaatst in een nieuwsgroep. Post je evt antwoord of
vervolgvraag graag in de nieuwsgroep a.u.b.

Post by Rodolfo
Thanks werkt goed, maar hoe doe ik dit nu voor een tijd veld?
Rodolfo

Post by Ingrid Baplue
Function isDatum(rng As Range)
Application.Volatile
If rng.Cells.Count > 1 Then
isDatum = CVErr(xlErrRef)
ElseIf IsDate(rng) Then
isDatum = True
Else
isDatum = False
End If
End Function
http://users.pandora.be/ingrid/excel/copyvba.htm#module
Bij het invoeren van een formule in een cel kan je deze functie
vinden in de cetegorie 'Door gebruiker gedefinieerd'. De formule zou
=ALS(isDatum(A1);"datum";"geen datum")
--
Ingrid Baplue
Microsoft MVP - Excel
http://users.pandora.be/ingrid/excel/
Dit bericht is geplaatst in een nieuwsgroep. Post je evt antwoord of
vervolgvraag graag in de nieuwsgroep a.u.b.

Post by Rodolfo
H.H.
hoe kan ik in excel in een formule met de ALS functie bepalen wat
een datum of tijdcel/veld is?
bvd
Rodolfo