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

"CalumMurdo Kennedy" wrote in messag
m..
Hi
I use the following formul

(activecell.resize(,8)=array("Forename","Surname", "Add1","Add2","Add3","Pos
code","Tel","Fax"
to insert various header text but this time I'd like to put the tex
in vertically, I thought this would be a simple change from (,8) t
(8,)...apparently not
Have I missed something obvious? or do I need to use something else t
make the column
Any help is appreciated
Best Regards
CalumMurdo Kennedy