TextBoxen befüllen
21.12.2024 20:50:07
Frank H.
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