Hi
Is there a simpler & neater way to write this in a For Each loop
With Sheet3.Shapes
.Range("Picture 7").Visible = msoFalse
.Range("Picture 9").Visible = msoFalse
.Range("Picture 4").Visible = msoFalse
.Range("Picture 5").Visible = msoFalse
.Range("Picture 6").Visible...