Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

CommandButtons sollen auf Schaltflächen-Klick deaktiviert werden

Gruppe

CommandButton

Problem

2 von 4 CommandButtons sollen auf Schaltflächen-Klick deaktiviert werden.

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: Modul1

Sub CmdsEnabled()
   Dim iCounter As Integer
   For iCounter = 2 To 3
      ActiveSheet.OLEObjects("CommandButton" & iCounter) _
         .Object.Enabled = False
   Next iCounter
End Sub