Re: Inserting column headers
From: Steve (anonymous_at_discussions.microsoft.com)
Date: 09/30/04
- Next message: Myriam: "Re: Retrieve data from closed workbooks - Ron de Bruin"
- Previous message: Ken: "VB Code to Delete Unused Rows"
- In reply to: Ron de Bruin: "Re: Inserting column headers"
- Next in thread: Tom Ogilvy: "Re: Inserting column headers"
- Messages sorted by: [ date ] [ thread ]
Date: Thu, 30 Sep 2004 08:02:32 -0700
Thanks Ron
>-----Original Message-----
>Try this
>
>Sub test()
> With Active***
> .Range("A1").EntireRow.Insert
> .Range("A1").Value = "Surname"
> .Range("B1").Value = "First Name"
> .Range("C1").Value = "Score"
> .Range("A1:C1").Font.Bold = True
> End With
>End Sub
>
>
>--
>Regards Ron de Bruin
>http://www.rondebruin.nl
>
>
>"Steve" <anonymous@discussions.microsoft.com> wrote in
message news:22bf01c4a6fb$07a08920$a601280a@phx.gbl...
>> How would I write a macro that:
>>
>> i)Inserts a new row in row 1 of my spread***
>> ii)Places columns names in A1 ("Surname"),B1 ("First
>> Name") & C1 ("Score") and Bolds them.
>>
>> Thanks in advance
>>
>
>
>.
>
- Next message: Myriam: "Re: Retrieve data from closed workbooks - Ron de Bruin"
- Previous message: Ken: "VB Code to Delete Unused Rows"
- In reply to: Ron de Bruin: "Re: Inserting column headers"
- Next in thread: Tom Ogilvy: "Re: Inserting column headers"
- Messages sorted by: [ date ] [ thread ]
