schreibweise-Problem durch Recorder
13.07.2006 08:43:09
Anton
ich habe ein ganz massives Problem:
Wenn ich einen bestimmten Vorgang mit dem Makrorekorder aufnehme,
kommt das hier raus:
Range("D194").Select
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[-190]C:R[-4]C)"
oder
Range("B74").Select
ActiveCell.FormulaR1C1 = "=DAY(DATE(YEAR(R[-72]C),MONTH(R[-72]C)+1,0))"
Solange die Formelzelle immer an der selben Stelle steht,
funzt es ja auch.
Nur lasse ich die Formel in die nächste freie Zeile eintragen.
...
Dim intZeilenanzahl%
intZeilenanzahl = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
Cells(intZeilenanzahl + 13, 2).Select
...
Ich komme nicht drauf wie ich den Recorder-Code abändern muß.
Bitte bitte wer kann mir weiterhelfen.
Ich bin wirklich aufgeschmissen.
Es dankt Euch
Euer Anton.