Als ik onderstaande code type dan krijg ik geen foutmelding.
Maar als ik Dagdeel ="morgen" achter "If Time < 0.5 Then" zet dan geeft hij wel de
compileer fout, hoe komt dit.
Public Sub VoorwaardeElseIf()
Dim Dagdeel As String
If Time < 0.5 Then
'belangrijk is dat je dagdeel niet na Then zet, want dan krijg je foutmelding ivm End If
Dagdeel = "morgen"
ElseIf Time >= 0.5 And Time < 0.75 Then
Dagdeel = "middag"
Else: Dagdeel = "avond"
End If
MsgBox "Goede" & Dagdeel & ", " & Application.UserName
End Sub
groeten,
Maar als ik Dagdeel ="morgen" achter "If Time < 0.5 Then" zet dan geeft hij wel de
compileer fout, hoe komt dit.
Public Sub VoorwaardeElseIf()
Dim Dagdeel As String
If Time < 0.5 Then
'belangrijk is dat je dagdeel niet na Then zet, want dan krijg je foutmelding ivm End If
Dagdeel = "morgen"
ElseIf Time >= 0.5 And Time < 0.75 Then
Dagdeel = "middag"
Else: Dagdeel = "avond"
End If
MsgBox "Goede" & Dagdeel & ", " & Application.UserName
End Sub
groeten,