Guten Tag zusammen,
Undzwar geht es darum das ich ein Makro erstellt habe der sieht so aus :
Sub Makro1()
' Makro1 Makro
'
Range("D3").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("1M").Select
Range("C6").Select
ActiveSheet.Paste
Sheets("Tabelle1").Select
Range("J3").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("1M").Select
Range("C7").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Tabelle1").Select
Range("R3").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("1M").Select
Range("C13").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("D26").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Tabelle1").Select
Range("H3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Das Problem ist jetzt das ich möchte das er in der Excel Tabelle jede Zeile mit diesem Makro ausfüllt sprich er soll bei Zeile 3 anfangen und bis 322 weiterführen ich habe 2 Mappen 1. "Tabelle1" und "1M"
Tabelle1 hatt die 322 Zeilen aber er springt nicht zur jeder Zeile und die Zelle "D3" , "J3", "R3", "H3" sollten dann auf die nächste Zeile Springen Sprich "D4", "J4" , "R3" , "H4" wenn er auch in der 4 Zeile ist
die restlichen Zellen sollen festbleiben zugehörig zu Mappe "1M"
ich hoffe es ist verständlich was ich meinte :'D