ich stehe gerade auf dem Schlauch.
In einer Tabelle möchte ich einen variablen Bereich mit einem Makro kopieren.
Folgenden Code habe ich bereits:Sub TESTKorrektur_Kopieren()
'
' Makro am 03.09.2002 von HUlm aufgezeichnet
'
'
Dim nummer As Integer
Dim anzahl As Integer
anzahl = Worksheets("Verkäufe").Range("B2").Value
'in B2 steht die Anzahl der Zeilen-1
nummer = Worksheets("verkäufe").Range("c2").Value
'in C2 steht die Zeile
N = nummer + anzahl
'N ist die Zeilennummer bis zu der markiert werden soll
Cells(nummer, 3).Select
'jetzt soll der Bereich von der gefundenen Zelle in C (Cells(nummer,3)) bis zur Spalte M
'(zeilen =anzahl) markiert werden
'Range("nummer,3:N,6").Select so gehts nicht
Selection.Copy
End Sub
Wie müsste der Befehl lauten, dass ab Cells(nummer,3).Select eine beliebige Anzahl von Zeilen, Wert ist mit anzahl festgelegt und steht in B2
Danke im vorraus.
Heinz