try this...
Sub Transpose()
'
' Macro Transpose
'
'
Range("A1").Select
Selection.CurrentRegion.Select
Selection.Copy
Selection.End(xlDown).Select
Selection.End(xlDown).Select
Selection.End(xlDown).Select
Range("G1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=True
End Sub
Regards,
Manoj Kumar
On Tue, Jan 25, 2011 at 8:42 AM, Manoj b <manoj.bi...@gmail.com> wrote:
> Hello All,
>
> Please can somebody advise me macros for paste special-transpose wherein i
> can just copy the data in horizontal format and paste them in vertical with
> a shortcut key.
>
> My data looks something like below in different sheets of same workbook
>
> 2009 2008 2007
> 1.2 0.84 0.94
>
> and i want it in below format.
>
> *2007* 0.94
> *2008* 0.84
> *2009* 1.20
>
> Any help would be much appreciated. I am in an urgent need of this.
>
> Many Thanks
> Manoj
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
> To post to this group, send email to excel-macros@googlegroups.com
>
> <><><><><><><><><><><><><><><><><><><><><><>
> Like our page on facebook , Just follow below link
> http://www.facebook.com/discussexcel
>
--
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links :
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
<><><><><><><><><><><><><><><><><><><><><><>
Like our page on facebook , Just follow below link
http://www.facebook.com/discussexcel
