Re: Zellwert in andere Tabelle übertragen
12.03.2003 17:51:11
Werner Hassold
Hallo Martin,
Danke erstmal für deine Antwort.Ich möchte einen Text (mehrere Zeilen) aus einer Tabelle auslesen und diese Zeilen in ein Array speichern.
Diese TextZeilen gebe ich dann in einer MsgBox aus.
Wenn ich die Tabelle nicht wechseln müsste wäre es einfach.
Beispiel:
Dim TextZeile(1 to 20) as String, i as Integer
For i=1 to 20
TextZeile(i)=Cells(i,2) 'B1..B20
Next i
MsgBox (TextZeile(1) + Chr(13) + TextZeile(2) + Chr(13) 'usw.
Einen Teil der Zeilen möchte ich dann in die aktuelle Tabelle
übertragen.
Die Quelltabelle soll aber nicht aktiviert werden!
Kannst du mir nochmal helfen?
Gruß Werner