MsgBox zweimal?
Lisa
Wenn nicht, dann meldet sich die msgbox und weist drauf hin.
Leider bekomme ich die MSGBox 2 mal angezeigt, es sollte aber nur einmal sein!!! was habe ich falsch gemacht?
Hat jemand eine Idee?
Private Sub CommandButton2_Click()
Dim objOle As OLEObject
Dim obj As Control, i%
For i = 1 To 2
Set obj = Me.Controls("Checkbox" & i)
If obj.Value = False Then
MsgBox "nö"
Else
Unload Me
End If
Next i
End Sub
vielen Dank für evtl. Lösungsansätze!
LG Lisa