Hát, talán ha ezt a Click eseményt hozzáadod a Munka3-hoz:
Private Sub Label1_Click()
Munka3.Shapes("Label1").Visible = False
Munka3.Shapes("Label1").Visible = True
End Sub
Van egy kis villódzás persze, ha bal egérgombbal klikkelsz a képen való mozgatáson + ez nem oldja meg a jobb klikkes problémát (mivel „right click” esemény nincs a Label-nél).
Remélem azért tudtam valamelyest segíteni.