Sheet Protection Options Changing When Macro Runs

Hello,

I need to allow the user to insert and delete unlocked rows, along with the ability to edit objects after the macro runs. I am having problems finding the proper code in the forums.

This is the macro I am running:


Sub Hidebutton()
ActiveSheet.Unprotect Password:=12345
Application.ScreenUpdating = False
Selection.AutoFilter Field:=1, Criteria1:="<>"
Application.ScreenUpdating = True
ActiveSheet.Protect Password:=12345
End Sub


I found this:

ActiveSheet.Protect Password:=" ", Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True, _
AllowFormattingCells:=True

It seems to be on the right track but I need help.

Thanks so much for your time.

AllowInsertingRows and AllowDeletingRows are the other two properties of the protect method you need to set to true.

Thanks Yudlungar. I keep getting an error when I type that in. Below is how I have it written.

Sub Hidebutton()
ActiveSheet.Unprotect Password:=12345
Application.ScreenUpdating = False
Selection.AutoFilter Field:=1, Criteria1:="<>"
Application.ScreenUpdating = True
ActiveSheet.Protect Password:=12345, Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True, _
AllowInsertingRows:=True
AllowDeletingRows:=True
End Sub

Thanks for your time

You need to put them as part of the protect method, i.e.

Please Login or Register  to view this content.

Thanks yudlugar. This does work up until I change or move the picture with in my unlocked cells on the sheet . It gives me the error "Object doesn't support this property or method". I need to have the ability to change/move the picture in the unlocked section anytime after the macro runs and still have the macro work at any time.

Thanks for your time

What is the code you are using to move the picture? I'd guess you should be using incrementleft and incremenettop?

Does the code work when your sheet is unprotected.

It would be very helpful if you could upload a workbook.

I am not using any code to move or manipulate the picture. I am doing it manually since it will have to be inserted and sized on a project by project basis. How would I upload the work book?

Click go advanced on the reply window and then attachments.

I'm confused though, the object doesn't support this property error is a vba error - but you say you are moving it manually?

Here is the workbook simplified to the single page. Thanks for helping out.

I'm still not sure what the problem you have is so apologies if this is nonsense, but, are you trying to move the picture and then running the macro with the picture still selected? If so, you will be trying to autofilter the picture, which would return the object doesn't support this method error you refer to.

Yudlugar, you are completly correct that I still had the picture selected which was causing me my issues. Thanks for everything.