25.05.2016, 10:15
(Dieser Beitrag wurde zuletzt bearbeitet: 25.05.2016, 10:15 von Steffl.
Bearbeitungsgrund: Punkt ergänzt
)
Hallo,
war zu langsam
war zu langsam
Code:
With Worksheets("Ausgang")
.Range("A4:D4").AutoFill Destination:=.Range("A4:D4").Resize(.Range("C2").Value), Type:=xlFillDefault
End With
Gruß Stefan
Win 10 / Office 2016
Win 10 / Office 2016