Prob mit Definition des .AutoFill-Bereichs (VBA)
24.10.2007 12:39:00
Jan
Folgende Codezeile bereitet mir Probleme :
Range("E4").AutoFill Destination:=Range("E4:E" & Range("D65536").End(xlUp).Row), Type:=xlFillDefault
Im Spezialfall, dass die Tab. und dann auch Spalte D ausser der Ueberschrift keine Daten enthaellt, sorgt diese Zeile dafuer, dass die Ueberschrift von Spalte E ueberschrieben wird.
Wollte das Prob mit .Offset (1,0) loesen, scheinbar kann dies aber zur Def. des AutofFill - Range nicht verwendet werden. Habs an verschiedenen Stelle der Zeile schon ausprobiert und fuehrt jedesmal zu einem Bug.
Zur Erlaeuterung:
1) In E4 wird eine Formel eingefuegt. Um Speicherplatz zu sparen, habe ich diese AutoFill-Funktion eingebaut, damit die Funktion nicht in der gesamten Spalte E steht.
2) Und bevor weitere Nachfragen kommen:-) : die Daten der Spalten A-D kommen aus einer PIVOT-Tab, die leider auch einmal voellig leer sein kann. Zur Aktualisierung der PIVOT habe ich ein Makro gebaut, das eben auch obige Zeile enthaellt. Spalte E ist kein Bestandteil mehr der PIVOT-Tab., sondern verwendet diese fuer eine sverweis-Suche.
Vielen Dank fuer euer Interesse und ggfls. Tipps zur Loesung!
MfG,
Jan