Combobox, Zelle neben der Auswahl anzeigen

07/12/2007 - 17:31 von Jürgen Stadermann | Report spam
Hallo!
Mittels einer Combobox selektiere ich einen Namen.
Nun möchte ich aber die den Inhalt einer Zelle z.Bsp. rechts neben den Namen
in einem vorhandenen Textfeld eingetragen haben.
Nun, ich könnte nachdem der Namen selektiert ist, eine Schleife laufen
lassen, die, wenn derInhalt der Combobox
erreicht ist, mittels Textfeld = ActiveCell.Offset(0,1) den Inhalt der
rechts stehenden Zelle einlesen lassen.
Frage: Gibt es da per VBA evtl. eine direktere Methode ?
Jürgen
 

Lesen sie die antworten

#1 Claus Busch
07/12/2007 - 18:56 | Warnen spam
Hallo Jürgen,

Am Fri, 7 Dec 2007 17:31:28 +0100 schrieb Jürgen Stadermann:

Mittels einer Combobox selektiere ich einen Namen.
Nun möchte ich aber die den Inhalt einer Zelle z.Bsp. rechts neben den Namen
in einem vorhandenen Textfeld eingetragen haben.
Nun, ich könnte nachdem der Namen selektiert ist, eine Schleife laufen
lassen, die, wenn derInhalt der Combobox
erreicht ist, mittels Textfeld = ActiveCell.Offset(0,1) den Inhalt der
rechts stehenden Zelle einlesen lassen.
Frage: Gibt es da per VBA evtl. eine direktere Methode ?



du könntest z.B. SVerweis verwenden. Angenommen, deine Namen stehen in
A1:A10 und dementsprechend die Werte in B1:B10. Dann könntest du der
Textbox den Wert aus B so zuweisen:

Private Sub ComboBox1_Change()

TextBox1.Text = _
WorksheetFunction.VLookup(ComboBox1.Text, Range("A1:B10"), 2, 0)

End Sub


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

Ähnliche fragen