variabele definieren

[westra77]

door option explicit krijg ik een foutmelding bij: Eindatum= 40179
hoe definieer ik deze variabele?
dim.............

Option Explicit

Sub DeleteThisModule()
Dim vbCom As Object
'einddatum = 39775 'vertegenwoordigt 22/11/2008
einddatum = 40179'vertegenwoordigt 1/1/2010
    If Date < einddatum Then Exit Sub
    Dim strprompt As String
strprompt = "De datum van het bestand is verlopen, het bestand wordt nu onbruikbaar gemaakt. Even geduld a.u.b." & vbCrLf & "Neem contact op met uw specialist voor een nieuwe versie"
MsgBox strprompt, vbCritical, "beveiligingswaarschuwing"

 

[Wigi]

Dim einddatum As Long

 

[westra77]

hallo wim
bedankt deze werkt
waarom long en niet bv integer

 

[Wigi]

Gewoon integer intypen in de helpfiles en je leest het af.