Array in Bereich kopieren
19.04.2017 21:30:05
Barbaraa
würde gerne ein Array in einen Rangebereich schreiben können.
Der Bereich B3 bis E20 ist als "Berechnung" benannt.
Ein Array soll in die dritte Zeile von "Berechnung" geschrieben werden.
Dann soll das Array geleert werden.
Sub Auswertung()
Dim Berechnung As Range 'Berechnung ist B3 bis E20
Dim Feld(0 To 3) As String
Set Berechnung = Range("Berechnung")
Feld(0) = "Apfel"
Feld(1) = "Banane"
Feld(2) = "Citrone"
Feld(3) = "Dattel"
'Die Früchte sollen in die 3. Zeile
'von "Berechnung".
'Dann soll das Feld leer gemacht werden.
End Sub
LG, barbara
Anzeige