I am trying to add some columns with the following code:

For i = start To finish
Columns("G:G").Select
Selection.Insert Shift:=xlToRight
Next i

The problem I am having is that I often get the message:

"Run-time error '1004':
To prevent possible loss of data, Microsoftw Excel cannot shift
onblank cell off the worksheet. ...."

I have reset my last cell and saved, but the error returns. Any ideas?

David

David

You have data in the last column of your worksheet(IV) and are trying to
insert a column which would shift that data off the sheet and Excel does not
like it.

Clear the data from column IV and your macro will work but bear in mind evey
time you insert a column data is shifted right and the problem will return.

Mike

"David" wrote:

I am trying to add some columns with the following code:

For i = start To finish
Columns("G:G").Select
Selection.Insert Shift:=xlToRight
Next i

The problem I am having is that I often get the message:

"Run-time error '1004':
To prevent possible loss of data, Microsoftw Excel cannot shift
onblank cell off the worksheet. ...."

I have reset my last cell and saved, but the error returns. Any ideas?

David

See if this helps


http://support.microsoft.com/default.aspx?kbid=211769
"Cannot shift objects off sheet" error message when you hide columns in
Excel

--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"David" wrote in message
oups.com...
I am trying to add some columns with the following code:

For i = start To finish
Columns("G:G").Select
Selection.Insert Shift:=xlToRight
Next i

The problem I am having is that I often get the message:

"Run-time error '1004':
To prevent possible loss of data, Microsoftw Excel cannot shift
onblank cell off the worksheet. ...."

I have reset my last cell and saved, but the error returns. Any ideas?

David

On Jul 2, 12:29 pm, "Bob Phillips" wrote:
See if this helps

http://support.microsoft.com/default.aspx?kbid=211769
"Cannot shift objects off sheet" error message when you hide columns in
Excel

--
HTH

Bob


I unhid every column and still get the message.

Check for comments, merged cells, objects, too.

David wrote:

On Jul 2, 12:29 pm, "Bob Phillips" wrote:
See if this helps

http://support.microsoft.com/default.aspx?kbid=211769
"Cannot shift objects off sheet" error message when you hide columns in
Excel

--
HTH

Bob


I unhid every column and still get the message.

--

Dave Peterson