ich habe folgendes Programm:
Private Sub CommandButton11_Click()
Dim i As Integer
CommandButton1.Locked = True
On Error Resume Next
For i = 10 To 20
Controls("Commandbutton" & i).Enabled = False
Next i
CommandButton11.Enabled = True
End Sub
Dieses Programm ist praktisch für die Commandbutton 10-20 gleich. Der einzige Unterschied ist das der jeweilige CommandButton.Enabled = True ist (hier: CommandButton11.Enabled = True)
Kann man das in die Schleife packen, das alle Buttons.Enabled = False werden, außer der, der gerade gedrückt wurde?
Danke Norbert