Am i being stupid :-)

[asolanki]

hi all

i have the following code :

Sheets("xxx").Select
ActiveSheet.Range("O2").Select
ActiveCell.FormulaR1C1 = _
"='AT68 Perm '!R[5]C[-13] & ""-"" & 'AT68 Perm '!R[6]C[-13]"
ActiveSheet.Range("O3").Select
ActiveCell.FormulaR1C1 = "=R[-1]C"
ActiveSheet.Range("O3").Select
Selection.AutoFill Destination:=Range("O3:O22"), Type:=xlFillDefault
ActiveSheet.Range("O3:O22").Select

I keep getting the following error on the Selction statement:
autofill method of range class failed

I cant for the life of me find a reason why I am getting the error, i know im doing something really stupid..can someone help

Thanks in advance

Ash

 

[anvil19]

Hey Ash

See my arrow below :

Sheets("xxx").Select 
ActiveSheet.Range("O2").Select 
ActiveCell.FormulaR1C1 = _   '<--- 2x = signes here!
"='AT68 Perm '!R[5]C[-13] & ""-"" & 'AT68 Perm '!R[6]C[-13]" 
ActiveSheet.Range("O3").Select 
ActiveCell.FormulaR1C1 = "=R[-1]C" 
ActiveSheet.Range("O3").Select 
Selection.AutoFill Destination:=Range("O3:O22"), Type:=xlFillDefault 
ActiveSheet.Range("O3:O22").Select

I don't know if that's it, but start there.


anvil19