Atofill Questions

's Computer Specifications

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.

's Computer Specifications

On Jan 18, 2:35*pm, lwm <l...@discussions.microsoft.com> 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

's Computer Specifications

Found the problem I was running from the editor instead of wroksheet

"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.

's Computer Specifications

Thanks That will work also.

"GTVT06" wrote:

> On Jan 18, 2:35 pm, lwm <l...@discussions.microsoft.com> 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
>

Thread Tools
Show Printable Version Email this Page
Rate This Thread
Rate This Thread:

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Bookmark questions Access/Word Error Message Two Questions	Kenny G	Microsoft Access Form Coding	0	1st Aug 2008 04:11 PM
Linksys NAS200 questions (general questions about RAID 0, 1)	Aloke Prasad	Storage Devices	0	6th Aug 2007 01:04 AM
Form that asks questions based on responses to other Questions	=?Utf-8?B?YWtrcnVn?=	Microsoft Access Getting Started	3	6th Jul 2007 02:43 PM
Re: After the Deletion of Google Answers, U Got Questions Fills the Gap Answering and Asking the Tough Questions	sechumlib	Microsoft C# .NET	0	7th May 2007 07:35 PM
SATA drive questions + raid questions	O \|V\| 3 G A	DIY PC	17	29th Sep 2003 11:28 PM