Peculiar behavior — button on userform

I would imagine it should be something like ...

Option Explicit

Sub Hide_Window()

    Application.Visible = False
    ToggleShow_Hide.Value = True

End Sub

Sub Show_Window()

    Application.Visible = True
    ToggleShow_Hide.Value = False

End Sub

Thank you again, Trevor

I tried inserting those toggle values in the Show and Hide macros, as you suggested. Then it wanted me to define "ToggleShow_Hide" so I defined it as "ToggleButton" (seemed logical). Like this:

Option Explicit
Dim ToggleShow_Hide As ToggleButton

Sub Hide_Window()

    Application.Visible = False
    ToggleShow_Hide.Value = True

End Sub

Sub Show_Window()

    Application.Visible = True
    ToggleShow_Hide.Value = False
    
End Sub

—but then it froze up on ToggleShow_Hide.Value, with the following message:
Attachment 663403. I'm so confused....Am I defining it wrong? Do I need another line to my definitions?