Forums Neueste Beiträge
 

Mehrere Zeilen auf einmal in Excel schreiben!

25/03/2010 - 12:58 von Hans Hegau | Report spam
Hallo NG,

ich versuche mehrere Zeilen auf einmal in Excel mit Daten zu füllen.
Es funktioniert auch ohne Probleme, wenn ich jeden Wert einzeln in die
Tabelle schreib:

For i = 1 to 1000
XLWorkSheet.range("B" & i).Value = strWert(i)
Next i

Doch dies ist relativ langsam.
Jetzt hatte ich mir vorgestellt alle Werte durch vbCrLf trennen und in
eine Variable zu schreiben.
Diese dann auf einmal in die Excel Tabelle zu schreiben:

For i = 1 to 1000
strVar = strVar & strWert(i)
Next i
XLWorkSheet.range("B1").Value = strVar

Doch leider funktioniert das nicht! Es wird nur ein Feld mit dem
kompletten Inhalt gefüllt.

Wenn ich den Range àndere funktioniert es auch nicht!!
XLWorkSheet.range("B1:B1001").Value = strVar

Kann mir jemand weiterhelfen??

Danke schon mal.

MfG, Hans Hegau
 

Lesen sie die antworten

#1 Hans Hegau
25/03/2010 - 13:08 | Warnen spam
Was ich noch vergessen habe:

Beim Versuch den Range zu àndern

XLWorkSheet.range("B1:B1001").Value = strVar

werden alle Zellen mit allen Werten aufgefüllt, das ist natürlich auch
zu viel des Guten! ;-)

Ähnliche fragen