Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.04.2024 12:29:20
VBA nur Zeilen mit bestimmten Eintrag selektieren
23.04.2024 11:26:57
Probleme mit tbl.Listrows.add
23.04.2024 10:55:14
Zeilen sortieren
23.04.2024 10:23:52
Tabelle 90° drehen + Filteroptionen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
304to308
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
304to308
304to308
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wert aus Combobox in Textbox

Wert aus Combobox in Textbox
08.09.2003 00:42:55
Uwe
Hallo,

folgende Frage:
ich habe auf einer Userform eine Combobox und eine Textbox.
Die Combobox wird aus einer Tabelle namens "Preisliste" über RowSource gefüllt
(Spalte B enspricht dem Artikelnamen)
Wie ist es zu verwirklichen, daß bei Auswahl eines Artikelnamen in der Combobox in der Textbox der Preis des ausgewählten Artikels (steht in Spalte C der Tabelle "Preisliste")erscheint.

Uwe

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert aus Combobox in Textbox
08.09.2003 06:44:07
Willie
Hallo Uwe

Hier kommt die Lösung für dich

Gruß

Willie


Private Sub ComboBox1_Change()
iWert = ComboBox1.Value
iMax = Cells(Rows.Count, 2).End(xlUp).Offset(0, 1).Row
For i = 1 To iMax
If iWert = Sheets("Tabelle1").Cells(i, 2).Value Then
Sheets("Tabelle1").Cells(i, 2).Activate
TextBox1.Value = ActiveCell.Offset(0, 1) ' 0= gleiche Reihe ,1 = eine Zelle daneben
Exit Sub
End If
Next
End Sub




Private Sub UserForm_Initialize()
Set frm = UserForm1
Controls("ComboBox1").AddItem
With frm.Controls("ComboBox1")
iMax = Cells(Rows.Count, 2).End(xlUp).Offset(0, 1).Row
For X = 1 To iMax
.AddItem Worksheets("Tabelle1").Cells(X, 2)
Next X
End With
End Sub

Anzeige
AW: Wert aus Combobox in Textbox
08.09.2003 07:00:04
TOM
Morgen Uwe

Ich würde das so lösen:

Option Explicit


Private Sub ComboBox1_Change()
Me.TextBox1.Value = Range("B:B").Find(Me.ComboBox1.Value).Offset(0, 1).Value & "Euro"
End Sub


Gruss TOM
AW: Wert aus Combobox in Textbox
08.09.2003 08:04:32
Uwe Berthold
Hallo Willie, Hallo Tom

vielen Dank erst mal für Eure Bemühungen,
beide Codes funktionieren einwandfrei!

Es ist schon einfach Klasse dieses Forum mit solchen
Helfern

bis demnächst
Uwe

299 Forumthreads zu ähnlichen Themen

Wert aus Combobox zurückgeben in Textboxen
Peter

Hallo wertes Form
bin kurz vor der Vollende meinesWerkes
benötige aber noch die Hife aus dem Forum
Ich habe eine Combox19, die beim öffnen die 5000-26000 in 100 Steps an zeigt
Wenn ich den wert 0 bis 6999 eingebe soll in einer Textbox27 der wert 130 ausgegeben werden.
ab dem...
10.08.2008 20:06:00
Thread-ID: 1000671
7 Beiträge
Anzeige
Externen Datensatz in TextBox einfügen
Wolfgang

Hallo,
Nachdem ich Ihr mir schon einmal sehr geholfen habt, versuche ich es noch einmal:
Ein Datensatz wird aus einer Datenbank (keine Access-Datenbank) ins Clipboard kopiert, danach in Excel eine UserForm mit einer TextBox geöffnet, die den Datensatz aufnehmen und danach an ein Excel-T...
19.09.2008 16:28:23
Thread-ID: 1011092
8 Beiträge
Aktive ActiveX Listbox feststellen
Micha

Hallo liebe Excelfreunde,
ich habe im Internet schon erfolglos gesucht und hoffe nun hier mit Eurer Hilfe endlich fündig zu werden.
Ich habe in einem Sheet mehrere ActiveX-Listboxen, die mit Hilfe einer Function aus dem Listindex der jeweiligen Listbox einen nummerischen Wert zurückgebe...
30.10.2008 10:21:00
Thread-ID: 1020497
8 Beiträge
Anzeige
MsgBox für TextBoxeingabe
Frank

Hallo Liebes Forum!
Mittels UF werden Daten in ein Tabellenblatt geschrieben. Damit zur späteren Berechnung alle Daten vorhanden sind, soll beim klick auf die Schaltfläche zur Dateneingabe ein Hinweis über eine MsgBox erfolgen wenn die erforderlichen Felder nicht ausgefüllt sind.
Zum Be...
17.11.2008 17:58:24
Thread-ID: 1025333
3 Beiträge
Text in Textbox an Cursorposition einfügen
Peter

Hallo zusammen,
ein Problem mit einer Textbox beschäftigt mich nun schon eine ganze Zeit. Vielleicht habt Ihr ja eine Idee zur Lösung ...
Ich schreibe eine Anwendung mit einer Userform. Auf der Userform ist eine Listbox und eine Textbox. Per Doppelklick auf einen Eintrag in der Listbox...
26.11.2008 15:45:07
Thread-ID: 1028071
3 Beiträge
ListBox mit Wert aus TextBox sortieren
A.Franz

Hallo...
ich habe folgendes Problem und hoffe das mir jemand helfen kann.Ich Habe eine UserForm mit einer ListBox und einer TextBox.Die ListBox hat 5-Spalten und wird mit Row-Source aus der Tabelle AF:AJ befüllt.Die Spalten der ListBox enthalten Text,Datum und Uhrzeiten.Wenn ich nun in in d...
28.11.2008 09:36:54
Thread-ID: 1028584
5 Beiträge
Von Textbox 27 Werte in Textbox 29
Heinz

Guten morgen Leute
Im unteren Code kann ich in Textbox27 eine 5 stellige Zahl eingeben,der mir dann im Worksheets("Artikeln") in Spalte A den übereinstimmenden Wert sucht.
Nun möchte ich aber das mir der Wert von Spalte B in Textbox29 anzeigt.
Z.B. Gebe in Textbox27 12345 ein, und...
09.01.2009 07:31:11
Thread-ID: 1038086
3 Beiträge
Text in Textbox markieren
Thomas

Hallo zusammen,
ich habe ein kleines Problem mit Textboxen.
Ich will eine Textbox erstellen in die ein Text eingetragen wird. Soweit hab ich das auch noch geschafft, allerdings will ich danach diesen Text gerne kopieren, in einem String speichern und im Firefox öffnen.
Probleme mach...
13.01.2009 07:04:00
Thread-ID: 1039072
8 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
6
8
7
7
5
2
2
4
2
7
11
2
3
4
2
2
6
9
2
6
4
1
3
1
2