Don gave you the correct interpretation:

Columns("F").Cut
Columns("A").Insert Shift:=xlToRight


You can look at it as 4 lines of code, but it is actually two commands
because you are performing two actions. The other lines are qualifiers to
avoid selecting. It is faster because it doesn't select. Lines of code per
se do not necessarily determine the efficiency of the approach.

--
Regards,
Tom Ogilvy




"Arnold Klapheck" wrote:

Columns("F:F").Cut Destination:=Range("A:A")
This pastes over the info in the column, I need to shift everything over to
the right.
also I can't select 2 columns to cut and past without selecting two columns
to paste to when I just want to paste the columns into a different spot.

Perhaps their is a totally different way to do this, I am attempting to
rearrange columns in a worksheet and sometimes delete entire columns.

thanks for your help so far, any other ideas?

on the second question it seems I am replacing three lines of code with four
lines of code, will the new way make it run faster?

With Columns("F:F")
.Style = "Comma"
.NumberFormat = _
"_(* #,##0.0_);_(* (#,##0.0);_(* ""-""??_);_(@_)"
End With