Move Column within Sheet with VB Macro

L

Letzdo_1t

I'd like to move a column in between existing columns and possibly have the
results pasted as values. I've been searching through the posting but haven't
found anything I could use.

Would appreciate your help.

Thanks
James
 
G

Gord Dibben

Turn on the macro recorder whilst you do these steps.

1. Select column B and hold SHIFT key.

2. Position cursor on the side of C1 then move to left of column F.

3. Copy>Pste Special>Values>OK>Esc.
 
G

Gord Dibben

How about side of B1, not C1<g>


Gord

Turn on the macro recorder whilst you do these steps.

1. Select column B and hold SHIFT key.

2. Position cursor on the side of C1 then move to left of column F.

3. Copy>Pste Special>Values>OK>Esc.
Click to expand...
 
L

Letzdo_1t

Gordon - Much thanks for your help, not only did I get the VB code
I'm looking for - I've just learned an easier way of recording a macro.

Thanks again,
James

VB Code:
Columns("B:B").Select
Selection.ColumnWidth = 6.14
Columns("B:B").Cut Destination:=Columns("F:F")
Columns("F:F").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
 
Top