On Jan 18, 2:35*pm, lwm wrote:
I did this with the macro recorder and it does not work.

* * * * ActiveCell.FormulaR1C1 = "Jan"
* * Selection.AutoFill Destination:=ActiveCell.Range("A1:L1"), Type:= _
* * * * xlFillDefault
* * ActiveCell.Range("A1:L1").Select

I am looking for an easy way top pread the months across the top of the
page. *This is for a calss on macros and how to modify.

Thanks in advance.

Hello Try this:

Range("A1").FormulaR1C1 = "Jan"
Range("B1").FormulaR1C1 = "Feb"
Range("A1:B1").Select
Selection.AutoFill Destination:=Range("A1:L1"),
Type:=xlFillDefault
Range("A1:L1").Select