Herbers Excel-Forum - das Archiv

ComboBox

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
Bild

Betrifft: ComboBox
von: Morthen

Geschrieben am: 18.02.2005 10:57:49
Hallo Leute
Ich habe eine ComboBoxliste mit Namen drin. Wenn ich jetzt einen dieser Namen auswähle, soll das Tabellenblatt mit dem entsprechenden Namen aufgehen.
Wie kann ich das machen?
Public
Sub Namenliste()
Dim i As Integer
Sheets("Kandidat").Namenauswahl.Clear
i = 5
Do While Sheets("Übersicht").Cells(i, 1).Value <> ""
Sheets("Kandidat").Namenauswahl.AddItem Sheets("Übersicht").Cells(i, 1)
i = i + 1
Loop
End Sub

Bild

Betrifft: AW: ComboBox
von: Gerd
Geschrieben am: 18.02.2005 11:00:29
Sheets(Namenauswahl).activate
Gerd
Bild

Betrifft: AW: ComboBox
von: Morthen

Geschrieben am: 18.02.2005 11:04:22
Danke Gerd...
Aber ich bekomme den Fehler 13...?
Typen unverträglich!
Option Explicit
Public
Sub Namenliste()
Dim i As Integer
Sheets("Kandidat").Namenauswahl.Clear
i = 5
Do While Sheets("Übersicht").Cells(i, 1).Value <> ""
Sheets("Kandidat").Namenauswahl.AddItem Sheets("Übersicht").Cells(i, 1)
i = i + 1
Loop
Sheets(Namenauswahl).Activate
End Sub

Bild

Betrifft: AW: ComboBox
von: Gerd

Geschrieben am: 18.02.2005 11:08:14
Sub Namenliste()
Dim i As Integer
with Sheets("Kandidat").Namenauswahl
.Clear
i = 5
Do While Sheets("Übersicht").Cells(i, 1).Value <> ""
.AddItem Sheets("Übersicht").Cells(i, 1)
i = i + 1
Loop
.Listindex = 0
End With
Sheets(Sheets("Kandidat").Namenauswahl).Activate
End Sub

Gerd
Bild

Betrifft: AW: ComboBox
von: Gerd
Geschrieben am: 18.02.2005 11:18:40
Hier fehlte eine Klammer:
Sheets(Sheets("Kandidat".Namenauswahl)).Activate
Gerd
Bild

Betrifft: AW: ComboBox
von: Morthen
Geschrieben am: 18.02.2005 11:16:24
Hallo Gerd
Habe den Code versucht, hat trotzdem Fehler...
Kann das so komplizeirt sein?
Danke nochmal für deine Hilfe
 Bild
Excel-Beispiele zum Thema "ComboBox "
ComboBox als Symbol Alle ComboBoxes auf Position 1
Werte in eine ComboBox einer UserForm übernehmen ComboBox in Abhängigkeit einer 2. ComboBox ein-/ausblenden
ComboBox mit Monatsnamen füllen Mehrspaltige ComboBox
ComboBox2 in Abhängigkeit von ComboBox1 bestücken Nur Zellen mit Inhalt in ComboBox listen
Neue UserForm bedingt nach ComboBox-Auswahl aufrufen Neues Element in ComboBox