Hi - I have some code that copies across an image and I need to pause everything until the user selects the image which then removes it from the sheet. I don't want the user to be able to do anything on the sheet until the Image has been removed.
I need to first macro to Pause until the user clicks the image (which has the 2nd macro assigned to it) - So need the code that goes at the end of Show_Help_Image
Can anyone help??
Many thanks in advance...
Here is my code....
Sub Show_Help_Image()
Range("c3").Select
Sheets("Help").Select
ActiveSheet.Shapes.Range(Array("Group 3")).Select
Selection.Copy
GoToLast
unProtect
Range("a1").Select
unProtect
ActiveSheet.Paste
Range("a1").Select
End Sub
Sub Delete_Help_Image()
unProtect
Range("a1").Select
Dim Shp As Shape
For Each Shp In ActiveSheet.Shapes
If Shp.TopLeftCell.Column = ActiveCell.Column Then Shp.Delete
ActiveCell = ""
Next Shp
Columns(ActiveCell.Column).ClearContents
Range("c3").Select
Protect
End Sub
Bookmarks