Wie kann ich erreichen, daß wenn eine Bedingung nicht erreicht ist, daß beim Aufruf der Userform1 sämtliche darin enthaltenen Commandbuttons ausgeblendet sind.
Gruß
Wolfgang
Private Sub UserForm_Initialize()
Dim objCon As Control
If "Wert" <> "Bedingung" Then
For Each objCon In Controls
If TypeName(objCon) = "CommandButton" Then
objCon.Visible = False
End If
Next objCon
End If
End Sub
Gruß Tino