Hello,
I think you can do this via a Paste function with the Transpose
indication = True.
I have recorded a small macro which does this job.
Sheets("Sheet1").Select
Range("A1:C3").Select
Selection.Copy
Sheets("Sheet2").Select
Selection.PasteSpecial Paste:=xlPasteAll, peration:=xlNone, SkipBlanks:=
False, Transpose:=True
kind regards,
Filip Henderieckx
*** Sent via Developersdex
http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!