Makro funktioniert nicht
27.03.2007 13:50:17
André
Hallo,
war gestern schon mit dieser Angelegenheit im Forum,
allerdings war dort eine andere Fragestellung.
Jetzt habe ich das Problem das Excel das Makro wie unten nicht ausführen will.
Was ich möchte bzw. will ist den Bereich von E4:E8 einmal von oben herab zu kopieren und von unten noch oben zu kopieren.
Was mach ich nu?
Bitte um Hilfe
Gruß
André
With ActiveSheet
.Unprotect
.Range("E4").Select
.Selection.AutoFill Destination:=Range("E4:E8"), Type:=xlFillCopy
.Range("E4:E8").Select
.Range("E8").Select
.Selection.AutoFill Destination:=Range("E4:E8"), Type:=xlFillCopy
.Range("E4:E8").Select
.Range("D3").Select
.Protect
End With
End Sub