folgendes Problem:
wenn ich den unten Code aus meiner Persmakro Tabelle starte bekomme ich Laufzeitfehler 1004.
Aus der Aktiven Tabelle heraus funktionert der Code.
Warum??
Dieses Makro soll mit einer Call Anweisung aus einer anderen Proc. aufgerufen werden.
Sub fill()
Sheets("K01952_n").Activate
Range("A2").Select
ActiveCell.FormulaR1C1 = "=MID(RC[2],1,4)" '
' diese obige Zeile wird angemeckert und bringt Laufzeitfehler 1004
Range("B2").Select
ActiveCell.FormulaR1C1 = "=MID(RC[1],5,2)"
Range("E2").Select
ActiveCell.FormulaR1C1 = "=CONCATENATE(MID(RC[-1],1,1),""."",MID(RC[-1],2,5),""."",MID(RC[-1],7,2),""."",MID(RC[-1],9,2),""."",MID(RC[-1],11,2),""."",MID(RC[-1],13,3),""."",MID(RC[-1],16,1))"
Range("A2:B2").Select
Selection.autofill Destination:=Range("A2:B598"), Type:=xlFillDefault
Range("A2:B598").Select
ActiveWindow.SmallScroll Down:=-69
Range("E2").Select
Selection.autofill Destination:=Range("E2:E598"), Type:=xlFillDefault
End Sub
könnt Ihr mir helfen??
gruss
Gerhard