2 makroer til en knap som skifter form

Hej

Her er et forslag med 2 knapper. Det er ret enkelt.
Jeg vil prøve om jeg kan lave med en knap hvor hvor tegnet ændres

https://www.dropbox.com/s/36pi5w6z0u6kuky/2%20makroer%20til%20en%20knap_mads32.xlsm?dl=0

ActiveX Knap

http://excel.pm/Eksperten/Plus_Minus.xlsm

Ovenstående Link virker ikke

Sub Minus()
Rows("5:10").EntireRow.Hidden = True
ActiveSheet.Shapes.Range(Array("Plus 1")).Visible = True
ActiveSheet.Shapes.Range(Array("Minus 3")).Visible = False
End Sub

Sub Plus()
Rows("5:10").EntireRow.Hidden = False
ActiveSheet.Shapes.Range(Array("Minus 3")).Visible = True
ActiveSheet.Shapes.Range(Array("Plus 1")).Visible = False
End Sub

Sub Placer_Figur()
ActiveSheet.Shapes("Plus 1").Top = Rows(3).Top ' celle B3
ActiveSheet.Shapes("Plus 1").Left = Columns("B").Left
ActiveSheet.Shapes("Minus 3").Top = Rows(2).Top ' B2
ActiveSheet.Shapes("Minus 3").Left = Columns("B").Left
End Sub

@store-morten
Den viser og skjuler rækkerne som den skal, men kommer med error hver gang. Desuden skifter figuren ikke form.

@excelent
Kan ikke se filen/linket

https://www.dropbox.com/s/qa0zt0wz9zovl7u/Vis%20Skjul.xlsm?dl=0

Amen det er smukt.
Tak for hjælpen!!!