Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

TextBoxen befüllen

Forumthread: TextBoxen befüllen

TextBoxen befüllen
21.12.2024 20:50:07
Frank H.
Hallo Zusammen,

Auf einem Tabellenblatt (Tabelle1) befinden sich Werte in den Zeilen 204 - 222, aber mit Leerzeilen, und der Spalte65.

Nun möchte ich beim Aufruf einer UF das sich die TextBoxen 1-13 mit den Werten füllen, es sind immer 13 Werte vorhanden.

Folgendes ist mein kläglicher Versuch:

x = 204

For i = 1 To 13

Me("TextBox" & i) = ActiveSheet.Cells(x, 65)

x = x + 1

Next i

Hier habe ich aber leere Textfelder, was nicht sein soll!

Wer kann und will mir helfen? Ich bin schon jetzt für jede Hilfe dankbar.

Gruß Frank H.
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: TextBoxen befüllen
21.12.2024 21:12:45
Uduuh
Hallo,
probier mal
i=1

For x = 204 To 222
If ActiveSheet.Cells(x, 65) >"" Then
Me.Controls("TextBox" & i) = ActiveSheet.Cells(x, 65)
i = i+1
End If
Next x

Gruß aus'm Pott
Udo
AW: TextBoxen befüllen
21.12.2024 23:40:34
Frank H.
Hallo Udo,

kam jetzt erst zum testen. Funzt wie gewollt. Super, Danke!

Dir und deiner Familie ganz tolle Festtage und einen guten Rutsch ins neue Jahr, verbunden mit bester Gesundheit!

L.G. Frank
Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18