Transposing numbers

[rjc44]

Hi,
In cells G1:M1, I can enter a range of numbers. Some cells
will be empty.
How can I copy this range to G9:G15

Thankyou

 

[Guest]

Straight from the Macro Recorder:

Sub Transpose()

Range("G1:M1").Select
Selection.Copy
Range("G9").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=True
End Sub

SuperJas.

 

[RWN]

Select and copy G1-M1
Select G9
Paste->Special
Select the "Transpose" option (lower right) and click "OK"

 

[Colo]

As a simple code,


Code: