I did a search here, but must be searching on the wrong criteria, as I
didn't find anything relevant. I want to move an entire column, column
"F" over to column "A", forcing "A" to "B". Some kind of cut and
entire.column insert, like:

rTitle.EntireColumn.Cut
rTitle.Column("A:A").EntireColumn.Insert <---- APPLICATION DOES NOT
SUPPORT THIS OBJECT OR METHOD

Does anyone see where the error is?
Thanks

Use this

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




--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"davegb" wrote in message ...
I did a search here, but must be searching on the wrong criteria, as I
didn't find anything relevant. I want to move an entire column, column
"F" over to column "A", forcing "A" to "B". Some kind of cut and
entire.column insert, like:

rTitle.EntireColumn.Cut
rTitle.Column("A:A").EntireColumn.Insert <---- APPLICATION DOES NOT
SUPPORT THIS OBJECT OR METHOD

Does anyone see where the error is?
Thanks

You don't really say what rtitle is
Sub movecolf()
Columns("f").Copy
Columns("a").Insert
Columns("f").Delete 'or clearcontents
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"davegb" wrote in message
...
I did a search here, but must be searching on the wrong criteria, as I
didn't find anything relevant. I want to move an entire column, column
"F" over to column "A", forcing "A" to "B". Some kind of cut and
entire.column insert, like:

rTitle.EntireColumn.Cut
rTitle.Column("A:A").EntireColumn.Insert <---- APPLICATION DOES NOT
SUPPORT THIS OBJECT OR METHOD

Does anyone see where the error is?
Thanks

So you don't have to wait for replies, a time saver can be using the macro
recorder. Tools-Macro-Record New Macro...

It works for some of the simpler things though at points, it includes some
unnecessary coding.

"davegb" wrote:

I did a search here, but must be searching on the wrong criteria, as I
didn't find anything relevant. I want to move an entire column, column
"F" over to column "A", forcing "A" to "B". Some kind of cut and
entire.column insert, like:

rTitle.EntireColumn.Cut
rTitle.Column("A:A").EntireColumn.Insert <---- APPLICATION DOES NOT
SUPPORT THIS OBJECT OR METHOD

Does anyone see where the error is?
Thanks

On Tue, 8 Jul 2008 08:44:01 -0700, StumpedAgain wrote:

So you don't have to wait for replies, a time saver can be using the macro
recorder. Tools-Macro-Record New Macro...

It works for some of the simpler things though at points, it includes some
unnecessary coding.

"davegb" wrote:

I did a search here, but must be searching on the wrong criteria, as I
didn't find anything relevant. I want to move an entire column, column
"F" over to column "A", forcing "A" to "B". Some kind of cut and
entire.column insert, like:

rTitle.EntireColumn.Cut
rTitle.Column("A:A").EntireColumn.Insert <---- APPLICATION DOES NOT
SUPPORT THIS OBJECT OR METHOD

Does anyone see where the error is?
Thanks



Thanks to all of you. Got it working!