Hi All,

I am writing a macro to use the data/subtotal tool that excel has. I am
inserting a column, and doing a "left" formula in the cell I want that to
start with, and then I am autofilling down. The problem is, I need it to
autofill to the end of the selection, not the end of excel, which it is doing
now....here is the portion of code for the formula and autofilling:

ActiveCell.FormulaR1C1 = "=LEFT(RC[-1],3)"
Selection.AutoFill Destination:=Range(ActiveCell, Selection.End(xlDown))

Also, this active cell in column D is at a different location for each wkst
I use the macro on, so I can't say anything like D1, or D2, it has to be from
the active cell location, and then only to the end of data, which also varies
for each worksheet.

Any help would be greatly appreciated!!!!!!