ich möchte eine Zeile so oft kopieren wie ein Bereich (Name) Zeilen hat. Für die For-Next-Schleife brauche ich also die Anzahl der Zeilen im Bereich XY.
Kann mir jemand sagen, wie ich das machen kann?
Ganz herzlichen Dank für die Hilfe.
Gruss
Frank
Sub zähleZeilen()
Dim Z1%, Z2%, ZL%, Namex
'Beispiel
Namex = "B10:C12"
Z1 = Range(Namex).Row 'erste Zeile des ausgewählen Bereichs
Z2 = Range(Namex).Rows.Count 'Anzahl Zeilen aus Bereich
ZL = Z1 + Z2 - 1 ' Letzte Zeile des Bereichs
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen