Excel2003: Listbox mir Besonderheit

04/10/2007 - 20:32 von Erich Jung | Report spam
Einen schönen Guten Abend an alle Excelianer.

Vielleicht kann mir jemand von Euch bei einem VBA-Problem helfen.

Ich möchte eine ListBox, die sich in einem Tabellenblatt befindet,
mit allen Tabellenblatt-Namen befüllen. Dies ist aber noch nicht mein
eigentliches Problem. Es sollen zwar alle Blàtter in der ListBox angezeigt
werden,
aber ich möchte erreichen dass durch irgend eine Vorgabe bestimmte Blàtter
nicht auswàhlbar/anklickbar sein sollen oder ev. erst gar nicht eingelesen
werden.
(Ich weiss das wiederspricht meiner ersten Forderung -> alle einlesen)

Ist so etwas per VBA machbar?

Gruss Erich
 

Lesen sie die antworten

#1 Claus Busch
04/10/2007 - 21:04 | Warnen spam
Hallo Erich,

Am Thu, 4 Oct 2007 20:32:20 +0200 schrieb Erich Jung:

Ich möchte eine ListBox, die sich in einem Tabellenblatt befindet,
mit allen Tabellenblatt-Namen befüllen. Dies ist aber noch nicht mein
eigentliches Problem. Es sollen zwar alle Blàtter in der ListBox angezeigt
werden,
aber ich möchte erreichen dass durch irgend eine Vorgabe bestimmte Blàtter
nicht auswàhlbar/anklickbar sein sollen oder ev. erst gar nicht eingelesen
werden.
(Ich weiss das wiederspricht meiner ersten Forderung -> alle einlesen)

Ist so etwas per VBA machbar?



vielleicht hilft dir dieser Code weiter (Die Listbox wird befüllt, wenn sie
den Fokus erhàlt):
Private Sub ListBox1_GotFocus()
Dim sh As Worksheet

ListBox1.Clear

For Each sh In ActiveWorkbook.Worksheets
If sh.Name <> "Tabelle2" And _
sh.Name <> "Tabelle4" Then
ListBox1.AddItem sh.Name
End If
Next

End Sub


Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP2 / Vista Ultimate
Office 2003 SP2 / 2007 Ultimate

Ähnliche fragen