Button to Delete Selected Cell

[johnpants]

I have a protected worksheet, and want to put a button on the sheet that deletes the selected cell. What is the easiest way to do this?

Thanks, John.

 

[Tazguy37]

Add this macro:

Sub deleteMe()

    ActiveSheet.Unprotect Password:="password"
    ActiveCell.Delete
    ActiveSheet.Protect Password:="password", DrawingObjects:=True

End Sub

and assign the button to it. Just edit the password for yours (or delete that parameter if you're not using one). Hope that helps!

• How to use the above code:
  
  Press Alt-F11 to open the VBE.
  Press Control-R to open the Project Explorer.
  Click "Microsoft Excel Objects" for the file you're working on.
  Select Insert, Module from the drop down menus.
  
  Open the Code pane with F7.
  Paste the above code in.
  Press Alt-Q to close the VBE and return to Excel

 

[johnpants]

Thank you, this works perfectly and is exactly what I was looking for.

Appreciate your time and effort!