Resizing a cell vertically to insert text

[CalumMurdo Kennedy]

Hi,

I use the following formula
(activecell.resize(,8)=array("Forename","Surname","Add1","Add2","Add3","Postcode","Tel","Fax")
to insert various header text but this time I'd like to put the text
in vertically, I thought this would be a simple change from (,8) to
(8,)...apparently not!

Have I missed something obvious? or do I need to use something else to
make the column?

Any help is appreciated,

Best Regards,

CalumMurdo Kennedy

 

[Bob Umlas]

Try:
activecell.resize(8)=application.transpose(array("Forename","Surname",
"Add1","Add2","Add3","Postcode","Tel","Fax"))

 

[Guest]

Thanks Bob

Works a treat. :-

Best Regards

CalumMurdo Kenned

----- Bob Umlas wrote: ----

Try
activecell.resize(8)=application.transpose(array("Forename","Surname"
"Add1","Add2","Add3","Postcode","Tel","Fax")