Beste mensen,
Ik krijg een foutmelding bij de volgende sub
het stukje: Or Environ("Username") = "pan30" Then kleurt dan rood. Bij bij staat dat op de 3de regel omdat het niet meer past op de 2de. Gebruik ik dan een verkeerde notatie ?
gr,
P
Ik krijg een foutmelding bij de volgende sub
Code:
Sub telefoon()
If Environ("Username") = "pan1" Or Environ("Username") = "pan2" Or Environ("Username") = "pan3" Or Environ("Username") = "pan4" Or Environ("Username") = "pan5" Or Environ("Username") = "pan6" Or Environ("Username") = "pan7" Or Environ("Username") = "pan8" Or Environ("Username") = "pan9" = "aandr2" Or Environ("Username") = "pan10" Or Environ("Username") = "pan11" Or Environ("Username") = "pan12" Or Environ("Username") = "pan13" Or Environ("Username") = "pan14" Or Environ("Username") = "pan15" Or Environ("Username") = "pan16" Or Environ("Username") = "pan17" Or Environ("Username") = "pan18" Or Environ("Username") = "pan19" Or Environ("Username") = "pan20" Or Environ("Username") = "pan21" Or Environ("Username") = "pan22" Or Environ("Username") = "pan23" Or Environ("Username") = "pan24" Or Environ("Username") = "pan25" Or Environ("Username") = "pan26" Or Environ("Username") = "pan27" Or Environ("Username") = "pan28" Or Environ("Username") = "pan29"
Or Environ("Username") = "pan30" Then
With Selection
.Value = "t"
.Interior.Color = 909581
.Font.Color = 909581
End With
End If
End Sub
het stukje: Or Environ("Username") = "pan30" Then kleurt dan rood. Bij bij staat dat op de 3de regel omdat het niet meer past op de 2de. Gebruik ik dan een verkeerde notatie ?
gr,
P
Laatst bewerkt: