Ich möchte aus Tabelle den Wert in Textboxen in UF einlesen.
Sub Daten_anzeigen()
Dim iSpalte As Integer, strTbox As String
For iSpalte = 1 To 10
strTbox = "tbx" & iSpalte
frmAenderung.Controls(strTbox) = wksUebertrag.Cells(1, iSpalte)
Next
End Sub
vielen Dank & GrußLorenz