CODEWITHSUNDEEP
excelvba
olivia adams
olivia adams

Reputation: 9

Converting Rows into Columns using VBA

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

Upvotes: 0

Views: 3371

Answers (2)

Jeff Anderson
Jeff Anderson

Reputation: 819

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?

Upvotes: 0

Siddharth Rout
Siddharth Rout

Reputation: 149325

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

Upvotes: 5

Related Questions