Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1072to1076
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Checkbox per VBA aufrufen
11.05.2009 15:21:58
Tobiax
Hallo!
Ich habe eine Liste mit hunderten Einträgen (nur 18 verschiedene).
Ich möchte nun auf einer Übersichtsseite 18 Button oder checkboxen o.ä. haben.
Jede(r) soll natürlich eine andere Beschriftung haben.
Da die 18 verschiedenen sich gelegentlich ändern, soll diese Seite auch immer automatisch angepasst werden.
Toby ...

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Statt Checkboxen Listbox mit MultiSelect
11.05.2009 17:08:27
Daniel
Hi
verwende statt der Checkboxen eine Steuerelement-Listbox mit aktivierter MULTISELECT-Eigenschaft und bei LISTSYTLE mit der Eigenschaft 1-frmListStyleOption.
das funktioniert genau so wie Checkboxen, aber lässt sich viel einfacher Handhaben, sowohl beim Erstellen, als auch beim Auswerten.
Einziger Nachteil, die "Checkboxen" stehen halt immer untereinander und können nicht individuell angeordnet werden.
befüllt werden könnte das ganze über folgendes Makro:

Private Sub ListBox1_GotFocus()
Dim arr
Dim i As Long, x As Long
arr = Intersect(Range("A1").CurrentRegion, Columns(1)).Value
With ListBox1
For x = 1 To UBound(arr, 1)
For i = 0 To (.ListCount - 1)
If arr(x, 1) = .List(i) Then Exit For
Next
If i > .ListCount - 1 Then .AddItem arr(x, 1)
Next x
End With
End Sub


Gruß, Daniel

Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige