Hallo Leute:
Ich möchte gerne wissen, ob ich diese Abfolge durch eine Schleife vereinfachen kann? Die Zellen sind immer anders und nicht Regelmässig!
Zur Orientierung einen Auszug aus meinem Makro:
Sheets("Maske").Select
Range("G20").Select
Selection.Copy
Sheets("Liste").Select
Range("M1").Select
Selection.End(xlDown).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Sheets("Maske").Select
Range("I16").Select
Selection.Copy
Sheets("Liste").Select
Range("N1").Select
Selection.End(xlDown).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Sheets("Maske").Select
Range("I18").Select
Selection.Copy
Sheets("Liste").Select
Range("O1").Select
Selection.End(xlDown).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Sheets("Maske").Select
Range("I20").Select
Selection.Copy
Sheets("Liste").Select
Range("P1").Select
Selection.End(xlDown).Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
und so wieiter etwa 20 mal...
Vielen Dank für eure Antwort!
Rolf