Hi
gibts ne Möglichkeit, eine ganze Excelzeile zb A1-K1, zb 10 Zellen in 10 Textfelder zuzuweisen, ohne das ich jeden Zellwert einzeln abrufen muss, zb. von einem String.
Notfalls ginge auch Eine Schleife.
mfg werner
Hi
gibts ne Möglichkeit, eine ganze Excelzeile zb A1-K1, zb 10 Zellen in 10 Textfelder zuzuweisen, ohne das ich jeden Zellwert einzeln abrufen muss, zb. von einem String.
Notfalls ginge auch Eine Schleife.
mfg werner
gibts ne Möglichkeit, eine ganze Excelzeile zb A1-K1, zb 10
Zellen in 10 Textfelder zuzuweisen, ohne das ich jeden
Zellwert einzeln abrufen muss, zb. von einem String.
Notfalls ginge auch Eine Schleife.
Hallo Werner,
je nach Daten in den Zellen ist Text und Value unterschiedlich in der Wirkung.
Sub fuellen()
Dim Spa As Long
With Worksheets("Tabelle1")
For Spa = 1 To 3 '10
'.OLEObjects("TextBox" & Spa).Object.Value = .Cells(1, Spa).Value
.OLEObjects("TextBox" & Spa).Object.Text = .Cells(1, Spa).Text
Next Spa
End With
End Sub
Gruß
Reinhard