Hello

After selecting all my (random) shapes on a sheet with the command

ActiveSheet.Shapes.SelectAll

I want to deselect one of them. I thought that the following code could do
the work but I turn in an error (object doesn't support the method)

ActiveSheet.Shapes("Picture 1").Deselect

What's the way to work around this

Thanks in advance for your help

Kind regards

Al