Converting Rows into Columns using VBA

Question

I am trying to convert a row of data into columns, The code I am using below copies my selection but then past it several times over.

Sub Movefromrowtocolumn()
   Range("B3:P3").Select
    Selection.Copy
    Range("Y2").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
     :=False, Transpose:=False
End Sub

Community · Accepted Answer · 2017-05-23 10:29:15Z

5

Is this what you are trying?

Sub Movefromrowtocolumn()
    Range("B3:P3").Copy
    Range("Y2").PasteSpecial Paste:=xlPasteValues, _
                             Operation:=xlNone, _
                             SkipBlanks:=False, _
                             Transpose:=True
End Sub

You needed to use Transpose:=True

Also INTERESTING READ

edited May 23, 2017 at 10:29

CommunityBot

11 silver badge

answered Aug 28, 2014 at 21:12

Siddharth Rout

150k18 gold badges212 silver badges258 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Jeff Anderson · Accepted Answer · 2014-08-28 21:12:23Z

0

This worked for me:

Sub Movefromrowtocolumn()
Range("A1:E1").Select
Selection.Copy
Range("F1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, transpose:=True
End Sub

Maybe the transpose:=True instead of false like you had?

answered Aug 28, 2014 at 21:12

Jeff Anderson

8198 silver badges21 bronze badges

Collectives™ on Stack Overflow

Converting Rows into Columns using VBA

2 Answers 2

Comments

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related