Guten Tag Gemeinde,
ich bin neu hier und stehe gerade total auf dem Schlauch Ich würde mich freuen, wenn ihr mir kurz helfen könntet.
Hier mein Problem: Ich möchte eine Zelle auslesen, und dann einen bestimmten Zellbereich (hier g23-m23) in so viele Zeilen untereinander kopieren wie in der Zelle angegeben. Z.B. Wert der Zelle "26", dann 26 Zeilen mit dem Inhalt aus g23 - m23.
Vielleicht kann ir ja jemand helfen. Anbei mein kläglicher Selbstversuch.
Vielen Dank, Mik
Dim zelle As Long
For zelle = 1 To Tabelle7.Range("x1")
With Range("g27" & zelle).Value
Tabelle7.Range("g23:m23").copy Destination:=Tabelle7.Range("g27")
End With
Next zelle
End Sub