zwei Bedingungen für If
01.02.2007 13:08:48
mtremer
diese Frage sollte für Euch Profis auch wieder zu lösen sein.
Mit einem CommandButton prüfe ich, ob eine Checkbox aktiviert ist. Wenn nicht, gibt es eine MassageBox:
Private Sub CommandButton1_Click()
With CheckBox1
If .Value Then
Range("A2").Value = "Alles super"
Else
MsgBox "kaputt, " & Range("A1")
Exit Sub
End If
End With
End Sub
Nun will ich aber, dass zwei CheckBoxen auf aktiv geprüft werden. Wenn keines von beiden aktiviert ist, soll die MassageBox kommen.
Ich habe nun schon einiges versucht, komme aber nicht weiter...
Danke für Eure Mühe.
Viele Grüße
Marco
Anzeige