Unable to Hide a column in Excel 97-2003 workbook

I am trying to hide a column A1 in my sheet using vba. But am getting a error "unable to set hidden property of range class"

Here is my code:

Please Login or Register  to view this content.

Am getting error in the line



Selection.EntireColumn.Hidden = True


I have included MsgBox to check whether the sheet is protected and is there any comment available in the cells of that column.

1st MsgBox returns as No Comments and 2nd returns as false.

So the sheet is not protected and comment is also not present.

Confused on why getting the error eventhough.

Please help me out

I think the other thing that would cause that (apart from comments/protection) is if you have objects/drawn shapes which don't resize.

How could i check that?

Please Login or Register  to view this content.

I guess

Yes... It is the shapes.. Done as you mentioned and it is hidden. But I have added comments to other column headers which i get on hovering mouse over the cell. Am not getting the comments now..

Does deleting shapes have something to do with comments?

I think the comments are contained in the activesheet.shapes collection so yes, they will be deleted also. You just need to set the objects that are in the column you want to hide so that they resize with cells/text I think.

So i have 6 column.. I don't have any comment in the column which i hide. So I need to hide the column and should not delete the comments in other 5 columns as well? Is there any way to achieve that?

You could try:

Please Login or Register  to view this content.

but I'm not certain that would work.

Or set the objects in the column you want to hide so that they resize with text/cells as I mentioned in post 7.

No that didn work.. I couldn't understand how to set object.Can u share me a code snippet on how to set the objects in a column.

sh.placement = xlMoveAndSize

Thanks a lot.. Works Perfect