My workbook have sheets with different amount of shapes and I have made following code:
ActiveSheet.Shapes("Option Button 9").Select
With Selection
.Value = xlOff
.LinkedCell = "Resultatverdier!A3"
.Display3DShading = False
End With
When I ask to select a shape that do not exist, I get a error message. How do I avoid that? I want the Code to do nothing og go further, if the shape I want to select do not exist in the particular sheet. Some suggestions anyone???
ActiveSheet.Shapes("Option Button 9").Select
With Selection
.Value = xlOff
.LinkedCell = "Resultatverdier!A3"
.Display3DShading = False
End With
When I ask to select a shape that do not exist, I get a error message. How do I avoid that? I want the Code to do nothing og go further, if the shape I want to select do not exist in the particular sheet. Some suggestions anyone???