Wenn Sie in VBA arbeiten, können Sie unter anderem ein „Benutzerformular“ erstellen. Diese Formulare bieten Ihnen die Möglichkeit, im Wesentlichen eigene Dialogfelder zu erstellen. Falls gewünscht, können Sie einem Benutzerformular viele verschiedene Arten von Steuerelementen hinzufügen. Sie können beispielsweise Beschriftungen, Textfelder, Dropdown-Listen, Optionsfelder und viele andere Steuerelemente hinzufügen.

Einige der Steuerelemente können Sie in der Größe ändern. andere kannst du nicht. Eine, deren Größe Sie nicht ändern können, ist ein Kontrollkästchen. Während Sie die Schriftgröße für die Beschriftung neben dem Kontrollkästchen ändern können, können Sie die Größe des Kontrollkästchens selbst nicht ändern.

Wenn Sie die Kontrollkästchen in Ihren Benutzerformularen für Ihren Geschmack zu klein finden, können Sie sie durch Simulieren eines Kontrollkästchens „umgehen“. Sie tun dies, indem Sie tatsächlich ein Etikett anstelle eines Kontrollkästchens erstellen. Ändern Sie dann die Eigenschaften des Etiketts so, dass es einen transparenten Hintergrund hat und die verwendete Schriftart Wingdings ist. Sie sollten auch sicherstellen, dass die Schriftart auf eine große Größe eingestellt ist, z. B. 20 oder 26 Punkte.

Doppelklicken Sie nun auf Ihr Etikett, um ein Codefenster zu öffnen. Das Ereignis, das Sie programmieren, ist das Click-Ereignis für das Label. Dies bedeutet, dass es ausgeführt wird, wenn auf das Label geklickt wird. Verwenden Sie dies als Ihren Code:

Private Sub Label1_Click()

If Label1.Caption = Chr(254) Then         Label1.Caption = Chr(168)

Else         Label1.Caption = Chr(254)

End If End Sub

In der Wingding-Schriftart ist Chr (254) ein Kästchen mit einem Häkchen und Chr (168) ein Kästchen ohne Häkchen. Wenn Sie das Benutzerformular ausführen und auf das Etikett klicken, wechselt es zwischen einem leeren und einem aktivierten Kontrollkästchen. Sie können dem Click-Ereignis auch anderen Code hinzufügen, der bei Bedarf andere Aufgaben ausführt.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (2282) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier:

Kontrollkästchen zum Ändern der Größe.