28.04.2021, 11:43
hallo,
Ich weiß dass ich nicht 2x Private Sub ComboBox203_Change() ansprechen kann.
Deshalb habe ich den 2. Code damit unter gepack.
Hintergrund:
Und TextBox214 soll nur als Anzeige sein.
Habe es auch schon mit Label versucht, da aktualisiert er es aber nicht in echtzeit.
ComboBox203 ist eine abfrageliste von Tabelle 1
In TextBox214 oder auch Label ist die Anzeige ausgabe, keine dateneingabe. von (TextBox204 & ComboBox203)
in TextBox204 ist Dateneingabe.
ich lege eine Test datei bei, die ist überarbeitet.
TextBox211 ist ein Tippfehler...
Und das probleme ist, dass Daten aus 2 Tabellen bezogen werden muss.
1. Tabelle1 wo die Daten der ComboBox203.
2. Tabelle2 wo die Daten abgespeichert wirt.
Und ich Brauche die ID von Tabelle1, deswegen der Code
Gruß
Ich weiß dass ich nicht 2x Private Sub ComboBox203_Change() ansprechen kann.
Deshalb habe ich den 2. Code damit unter gepack.
Code:
TextBox214.Text = TextBox204.Text & ComboBox203.Value
Hintergrund:
Und TextBox214 soll nur als Anzeige sein.
Habe es auch schon mit Label versucht, da aktualisiert er es aber nicht in echtzeit.
ComboBox203 ist eine abfrageliste von Tabelle 1
In TextBox214 oder auch Label ist die Anzeige ausgabe, keine dateneingabe. von (TextBox204 & ComboBox203)
in TextBox204 ist Dateneingabe.
ich lege eine Test datei bei, die ist überarbeitet.
TextBox211 ist ein Tippfehler...
Und das probleme ist, dass Daten aus 2 Tabellen bezogen werden muss.
1. Tabelle1 wo die Daten der ComboBox203.
2. Tabelle2 wo die Daten abgespeichert wirt.
Code:
Private Sub ComboBox203_change()
With Tabelle1
TextBox202.Text = .Cells(ComboBox203.ListIndex + 2, 2).Value
End With
TextBox214.Text = TextBox204 & ComboBox203
End Sub
Und ich Brauche die ID von Tabelle1, deswegen der Code
Code:
With Tabelle1
TextBox202.Text = .Cells(ComboBox203.ListIndex + 2, 2).Value
End With
Gruß