Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
636to640
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
636to640
636to640
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
ComboBox füllen in abhängikeit einer TexBox
15.07.2005 08:18:41
Werner
Hallo zusammen,
auf einer Userform habe ich eine TextBox und eine ComboBox.
Ich möchte jetzt in der TextBox z.B. A eintragen und in der ComboBox soll vom Tabellenblatt "Hilfe" die Liste aus der Spalte Q angezeigt werden.
Bei B Spalte U
Bei C Spalte Y
kann mir da jemand helfen?
Werner

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ComboBox füllen in abhängikeit einer TexBox
15.07.2005 10:34:57
Heiko
Hallo Werner,
z.B. so. In das Codefenster des Userforms.

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
' Wert aus Textbox wird nur ausgewertet wenn die ENTER Taste gedrückt wird.
If KeyCode <> vbKeyReturn Then Exit Sub
Select Case TextBox1.Value
Case "a", "A"
Me.ComboBox1.RowSource = "Hilfe!Q1:" & Sheets("Hilfe").Range("Q65535").End(xlUp).Address
Me.ComboBox1.ListIndex = 0
Case "b", "B"
Me.ComboBox1.RowSource = "Hilfe!U1:" & Sheets("Hilfe").Range("U65535").End(xlUp).Address
Me.ComboBox1.ListIndex = 0
Case "c", "C"
Me.ComboBox1.RowSource = "Hilfe!Y1:" & Sheets("Hilfe").Range("Y65535").End(xlUp).Address
Me.ComboBox1.ListIndex = 0
Case Else
MsgBox " Sie haben einen falschen Buchstaben eingegeben! ", vbCritical
Me.TextBox1 = ""
End Select
End Sub

Gruß Heiko

PS: Rückmeldung wäre nett !
Anzeige
AW: ComboBox füllen in abhängikeit einer TexBox
18.07.2005 07:37:29
Werner
Hallo Heiko,
danke für Deine hilfe, habe es hinbekommen.
Werner

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige