Autofill NOT COPYING formula

[simora]

I have a formula at a location on a worksheet.
When I select that cell, I want to copy that formula across the worksheet for 7 columns, but Autofill is copying the value rather than the formula.

Any ideas how to stop this and copy only the formula.

This is the code that I'm using.

Range("AU65536").End(xlUp).Offset(2, 0).Select  
Selection.AutoFill Destination:=Range(ActiveCell, ActiveCell.Offset(0, 7)), Type:=xlFillDefault

[Paul_Hossler]

Works for me

I was wondering about the

Range("AU65536").End(xlUp).Offset(2, 0).Select 
 

since it seems to go up to the first non-blank cell, and then down 2, which seems like it'd be blank

Maybe post a small workbook

[snb]

This functions as expected:

In A1: "=A9+12"

Sub M_snb()
   Cells(1).AutoFill Cells(1).Resize(, 10)
End Sub

In J1 I find: "=J9+12"

[simora]

Thanks for the responses:
Paul_Hossler & snb


Upon closer inspection, the formula in that cell needed to be converted.
The formula =SUM($AU$2:$AU$15) needed to be =SUM(AU2:AU15) to work as intended.

[Paul_Hossler]

Don't you hate it when Excel does what you tell it to do, and not what you want it to do?

[snb]

The development of an emphatic Excel version would be a challenge for AI.