Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1620to1624
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
1620to1624
1620to1624
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Textboxen einlesen

Textboxen einlesen
29.04.2018 12:16:49
Guesa
Hallo Forum
Ich habe mir eine Abfrage mit MsgBox erstellt, nun wollte ich mir das ganze in einer Userform anzeigen lassen, leider ohne Erfolg. Die Useform durchläuft zwar die Schleife aber in den Textboxen wird nichts angezeigt. Wo ist da der Fehler bzw. wie wird es richtig gemacht. Für Eure Hilfe schon mal ein Danke
Gruß, Guesa
Private Sub UserForm_Initialize()
Dim x
For x = 3 To 9
Me.TextBox1.Value = Sheets("Tabelle1").Cells(x, 1).Text
Me.TextBox2.Value = Sheets("Tabelle1").Cells(x, 2).Text
Next
End Sub

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textboxen einlesen
29.04.2018 12:19:42
Hajo_Zi
UserForm_Initialize wird in einer Sitzung nur 1x ausgeführt, falls nicht unload gemacht wird.
Warum Schleife, es wird nur der letzte Wert angezeigt.
nur wenige schauen auf Deinen Rechner und sehen die Datei.
Ich möchte gerne den Fehler im Original sehen.
Ich baue keine Datei nach. Die Zeit hat schon jemand investiert.
Ein Nachbau sieht meist anders aus als das Original. Darum sollte das Original verlinkt werden.
Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten anonymisieren bzw. pseudonymisieren.
Benutze hier im Forum die Funktion zum hochladen. Falls Du die nicht benutzen möchtest beachte, von unsicheren Servern wie z.B. www.file-upload.net lade ich keine Datei runter. (lt. Einschätzung meines Virenprogramms)

Beiträge von Werner, Luc, robert, J.O.Maximo und folgende lese ich nicht.
Anzeige
AW: Textboxen einlesen
29.04.2018 12:36:08
Daniel
Hi
da du in der Schleife immer wieder die gleiche Textbox mit dem neuen Zellwert überschreibst, wird nach Durchlauf in der Textbox1/2 der Wert aus Zelle A9/B9 angezeigt und die sind wahrscheinlich leer.
Wenn du jedoch 14 Textboxen hast, damit du jeden Zellwert anzeigen lassen kannst über den die Schleife läuft, müsstet du den Textboxnamen ebenfalls über den Schleifenzähler "berechnen" lassen.
for x = 3 to 9
me.Controls("Textbox" & (x - 3) * 2 + 1).Value = Sheets("Tabelle1").Cells(x, 1).Text
me.Controls("Textbox" & (x - 3) * 2 + 2).Value = Sheets("Tabelle1").Cells(x, 2).Text
Next
Gruß Daniel
Gruß Daniel
Anzeige
AW: Textboxen einlesen
29.04.2018 13:26:15
Werner
Hallo,
der Code von Daniel läuft in einer Schleife über die Textboxen 1-14, somit mußt du auch 14 Textboxen auf deiner Userform haben.
Ich hab deine Userform mal daran angepasst.
Allerdings ist mir ehrlich gesagt völlig unklar was du eigentlich erreichen möchtets.
Zudem hast du den Code von Daniel auch noch falsch abgeschrieben:
Daniel: Me.Controls("Textbox" & .....
Du: Me.Controls("Textbox1" & .....
https://www.herber.de/bbs/user/121346.xlsm
Gruß Werner
Anzeige
AW: Textboxen einlesen
29.04.2018 15:03:48
Guesa
Hallo Werner
Ich wollte mir eigentlich jede Zeile, wo in der Spalte G und H eine 1 steht anzeigen lassen, genau wie es mit der MsgBox angezeigt wird. Also Spalte G = 1 dann Standort - Name - Nachname usw. Userform bestätigen nächste 1 Abfragen usw. Die Spätere Liste kann 50 oder mehr Einträge und Spalten haben. Sorry das ich mich da so unglücklich ausgedrückt habe. Ehrlich gesagt war mir das mit den 14 Textboxen nicht so klar, muss halt noch viel lernen.
Es ist mir aber auch klar, dass es für Euch Spezialisten ärgerlich sein muss wenn die Fragestellung nicht so klar ist. Versuche mich zu bessern
Gruß, Guesa
Anzeige

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
Wie kann ich 3 Textboxen wert addieren
Kurt

Guten Abend,
wie kann ich 3 Werte der Textboxen addieren ?
Habe es so versucht:
Label69.Caption = TextBox13.Value + TextBox14.Value + TextBox15.Value
mfg Kurt
(nicht Orginal)
14.08.2008 20:54:00
Thread-ID: 1001982
4 Beiträge
Färben von Textboxen in Userform
Textboxen

Guten Morgen!
Ich habe in einer UserForm 22 TextBoxen in denen Zahlen stehen.
Wenn eine positive Zahl in den Textboxen steht, dann soll der Hintergrund (Backcolor) grün gefärbt werden.
Wenn eine negative Zahl in den Textboxen steht dann soll der Hintergrund hellrot gefärbt werden.<...
21.08.2008 07:38:00
Thread-ID: 1003354
4 Beiträge
Anzeige
TextBoxen formatieren
Frank

Hallo liebes Forum!
Wieder einmal brauche ich Rat! In einem Tabellenblatt befinden sich mehrere Textboxen, welche über die Eigenschaft LinkedCell sich ihren Inhalt holen. Nun möchte ich das wenn der darin befindliche Wert negativ ist, der Inhalt rot geschrieben wird. Wie bekomme ich zwische...
28.10.2008 20:37:00
Thread-ID: 1020080
10 Beiträge
TextBoxen werden nicht geleert
Josef

Hallo!
Ich habe folgenden Code in einer Userform
Private Sub ListBox1_Click() On Error Resume Next If ListBox1.List(ListBox1.ListIndex, 7) = "EV-N / FV-XPV" Then Call Text_EF Call Text_EF2 Call Text_EF3 TextBox40.Text = "" Else If ListBox1.List(ListBox1.ListIndex, 7) = "J" Then TextBo...
29.10.2008 14:19:00
Thread-ID: 1020283
3 Beiträge
Textboxen aus Tabelle füllen
Sebastian

Guten Abend zusammen,
ich sitze wieder mal vor einem Problem und hoffe auf eure Hilfe. Ich habe eine Tabelle mit Kundennamen, die sich von Monat zu Monat verändert. Ich möchte nun (wenn möglich) eine Userform mit einer variablen Anzahl von Textfeldern auf "Knopfdruck" generieren, wobei die...
03.11.2008 18:25:00
Thread-ID: 1021413
6 Beiträge
Nur Zahlen in sehr vielen Textboxen
uli

Hallo,
habe ein im Internet gefunden, der allerdings noch ein bisschen angepasst werden muss. Vielleicht könnt ihr mir helfen, da ich an dieser Stelle nicht mehr weiterkomme.
Ich möchte die Eingabe von Buchstaben in mehreren Textboxen verbieten. Dies mache ich mit folgendem Code in eine...
13.11.2008 10:24:00
Thread-ID: 1024091
3 Beiträge
Rechnen mit TextBoxen
Frank

Hallo Zusammen!!!
Einen schönen guten Abend und schon vorab Danke für bestimmt zahlreiche Hilfe!
Ich benutze folgenden Code:
TextBox4.Value = TextBox2.value - TextBox3.Value
Diese Codezeile wird mittels Klick auf eine Schaltfläche ausgelöst. Funzt mit normalen Zahlen auch Super,...
14.11.2008 19:27:33
Thread-ID: 1024690
7 Beiträge
Anzeige

Links zu Excel-Dialogen

TextBox UserForm

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
7
3
3
1
9
2
5
2
6
5
2
11
4
4
1
20
12
2
5
15
2
3
14
1