Why macro not working?

Im creating a macro for UV spot, I have recorded the macro in this few steps.

With my image selected. Effects-> adjustment->HUE-> In the Hue -180, Saturation -100 & Lightness -100 press ok. It turn black. And stop macro. When i play the macro does not work. I check inside the macro for coding
(Sub UV()
' Recorded 20/01/2021
Dim OrigSelection As ShapeRange
Set OrigSelection = ActiveSelectionRange
End Sub
Any help or suggestion how it work. Thanks