Herbers Excel-Forum - das Archiv

Nocheinmal Textbox

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

Betrifft: Nocheinmal Textbox
von: michael
Geschrieben am: 02.12.2003 11:30:20
Hallo noch einmal zusammen
Warum werden bei diesem Code nur die Änderungen der 1.Textbox übernommen und die anderen nicht?? Was mache ich wieder einmal falsch?



Private Sub Datenändern_Click()
z = FamiliennameCbo.ListIndex + 1
Cells(z, 1) = TextBox1.Value
Cells(z, 2) = TextBox2.Value
Cells(z, 3) = TextBox3.Value
End Sub


Danke
Michael
Bild

Betrifft: AW: Nocheinmal Textbox
von: K.Rola
Geschrieben am: 02.12.2003 12:38:43
Hallo,

der Code ist schon ok, wahrscheinlich ändert sich beim Zurückschreiben
in die Tabelle die Combobox? Wie wird die Combobo gefüllt?

Gruß K.Rola
Bild

Betrifft: AW: Nocheinmal Textbox
von: michael
Geschrieben am: 02.12.2003 12:49:03
Hallo Rola
mit der Eigenschaft RowSource>vielleicht ist das der Fehler.

Gruß Michael
Bild

Betrifft: AW: Nocheinmal Textbox
von: K.Rola
Geschrieben am: 02.12.2003 13:05:14
Hallo,

RowSource kann ja kein Fehler sein. Du erzeugst aber so eine Art
"Katze beißt sich in den Schwanz- Effekt". Du änders die Quelle und die
ändert wieder die Combobox, You know?
Wird RowSource in den Eigenschaften eingestellt oder per Code zur
Laufzeit? Wenn letzteres, poste mal den Code.

Gruß K.Rola
Bild

Betrifft: AW: Nocheinmal Textbox
von: michael
Geschrieben am: 02.12.2003 13:15:58
Ich lese das ganze mit RowSource KndNr!A2:A1500 (Eigenschaftsfenster) aus


Private Sub FamiliennameCbo_Change()
If FamiliennameCbo.ListIndex > -1 Then
TextBox1 = Cells(FamiliennameCbo.ListIndex + 1, 1)
TextBox2 = Cells(FamiliennameCbo.ListIndex + 1, 2)
End Sub


Bild

Betrifft: AW: Nocheinmal Textbox
von: K.Rola
Geschrieben am: 02.12.2003 13:20:41
Hallo,

wo ist der Code, wo RowSource zugewiesen wird?

Gruß K.Rola
Bild

Betrifft: AW: Nocheinmal Textbox
von: michael
Geschrieben am: 02.12.2003 13:28:11
Hallo
Ich hoffe ich kanns erklären.
Bei der ComboBox (FamilennameCbo)/ mit der rechten Maustaste öffne ich das Eigenschaftsfenster (Eigenschaften)/und dann RowSource. Ich weiß leider nicht wie das anders geht bzw. obs richtig oder falsch ist.
Gruß
Michael
Bild

Betrifft: Danke Rola
von: michael
Geschrieben am: 02.12.2003 13:38:29
Ich habs. Wenn Du nich so nachgebohrt hättest mit dem auslesen dann wäre ich wahrscheinlich nie draugekommen.


Private Sub UserForm_Initialize()
Familiennam5.RowSource = "KndNr!A2:A2000"
End Sub


Danke
Michael
Bild

Betrifft: AW: Nocheinmal Textbox
von: K.Rola
Geschrieben am: 02.12.2003 13:40:03
Hallo,

wenn sich die Combobox wie gewünscht füllt, kann daran nicht falsch sein.
Du musst, damit sich das Problem lösen läßt, RowSource per VBA zuweisen.
Ich lad dir mal ein Beispiel hoch, kann aber sein, erst nach 16:00 Uhr.

Gruß K.Rola
Bild
Excel-Beispiele zum Thema " Nocheinmal Textbox"
Text aus Textbox in Variable Namen von TextBoxes hochzählen
Text aus Textbox in Zellen aufteilen Nichtnumerische Eingaben in TextBox verhindern
Text aus UserForm-Textbox in Variable einlesen Nur Buchstaben in eine UserForm-TextBox
TextBoxes- und Label-Werte in Abhängigkeit verändern Nur AJM in TextBox akzeptieren und Anzahl zählen
Eingabelänge in TextBox begrenzen und Werte aus Liste übernehmen Artikel aus Auswahltextbox in Sammeltextbox verschieben