autoausfüllen
16.09.2007 12:04:51
Stefan
habe ein kleines Problem, bin mir aber sicher, das Ihr Profis mir helfen könnt.
Ich möchte mit "Autoausfüllen" einige Zellen mit einem dicken Strich unterstreichen und das per VBA.
Jetzt das Problem:
Es handelt sich nicht immer um die gleiche Zeile. Die Anzahl der Zellen ist aber gleich.
Mit nachfolgendem Code, der von einem Makro umgebaut wurde, klappt es aber nicht.
Ursprung:
ange("a" & zähler2 + 1).Select
Selection.AutoFill Destination:=Range("A" & zähler2 + 1), Type:=xlFillDefault
Umgebaut:
ange("a:g" & zähler2 + 1).Select
Selection.AutoFill Destination:=Range("A:G" & zähler2 + 1), Type:=xlFillDefault
Weiss jemand vielleicht einen Tipp oder besser noch eine Lösung.
Danke und noch ein schönes Wochenende
Gruß
Stefan