Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

ComboBox als Symbol

Gruppe

ComboBox

Problem

Wie kann ich eine Tabellenblatt-ListBox auf Icon-Größe verkleinern?

Lösung
Geben Sie den nachfolgenden Code in die genannten Module ein und weisen Sie dem im Standardmodul einer Schaltfläche zu.

ClassModule: Tabelle1

Private Sub lstBox_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
   lstBox.Visible = False
   Shapes("objList").Visible = True
End Sub

StandardModule: Modul1

Sub objList_CLick()
   With Worksheets("Tabelle1")
      .lstBox.Visible = True
      .Shapes("objList").Visible = False
   End With
End Sub