Hiding Picture & Sheet from checkbox

[NiallCollins]

Good Morning All,

I need to hide a sheet & an image when a checkbox is unchecked. Its so when the checkbox is unchecked, The image, which is a shortcut to the page when clicked, is no longer visible. I can get either or working but need to know how to do both together.

Thanks in advance
Niall

 

[Yongle]

Explanation of the code

Application.Caller returns the name of the clicked checkbox
That name is passed to macro HideSheetAndImage

A (Forms Control) checkbox has value 1 when checked
The code sets boolean variable BoxChecked to TRUE if the checkbox is checked

'it does this
If  aCheckBox.OLEFormat.Object.Value = 1 Then BoxChecked = TRUE Else BoxChecked = FALSE
'but this is more succinct way to say the same thing
BoxChecked = ( aCheckBox.OLEFormat.Object.Value = 1)

These two lines set the image and sheet to visible or not visible using the current value of boolean variable BoxChecked

ActiveSheet.Shapes(BoxCaption).Visible = BoxChecked
Sheets(BoxCaption).Visible = BoxChecked

 

[NiallCollins]

Its working perfectly and thanks for explaining it. A Massive help