aantal dagen berekenen

[DirkB]

in een userform heb ik een textbox waar een datum wordt ingegeven.

nu wil ik een 2e tekstbox laten verschijnen als de ingegeven datum 24 jaar of korter is dan vandaag (8766 dagen)

If Date - IsDate(TextBox1.Value) < 8765 Then
      Textbox2.Visible = True
      Else
       TextboX2.Visible = False
    End If

wat doe ik fout?

 

[wampier]

isdate geeft 1 of 0 terug. je moet na controleren van de input met isdate de rest uitvoeren

 

[DirkB]

thnx. het werkt

If Date - Datevalue(TextBox1) < 8765 Then
      Textbox2.Visible = True
      Else
       TextboX2.Visible = False
    End If

 

[gast0660]

Met deze:

If Date - CDate(TextBox1.Value) < 8765 Then
      TextBox2.Visible = True
      Else
       TextBox2.Visible = False
    End If