Checkbox in ribbon

[wmbb]

Is it possible to create a custom tab in excel containig a checkbox showing de protection state.
Checkbox checked if worksheet is protected and unchecked when worksheet is not protected.
I was thinking of a worksheet_activate procedure but how do I control the checkbox in the ribbon using vba ?

 

[SkipVought]

https://msdn.microsoft.com/en-us/library/bb386104.aspx

Skip,
[sub]
Just traded in my OLD subtlety...
for a NUance![/sub]

 

[wmbb]

I already have created a custom tab containing a checkbox but I want to control the checkbox depending on the state of the active sheet....
Checkbox checked if worksheet is protected and unchecked when worksheet is not protected.

Something in code like:
If ActiveSheet.ProtectContents = True then ThisWorkbook.ribbon.controls("checkbox1").Checked = True
But then the correct code ;-)

 

[SkipVought]

So what does this code do?

ThisWorkbook.ribbon.controls("checkbox1").Checked = ActiveSheet.ProtectContents

You could run the code in the WorkSheet_Acrivate Event.j

No doubt you've tried using the macro recorder to see what code is generated by checking/unchecking the box.

Skip,
[sub]
Just traded in my OLD subtlety...
for a NUance![/sub]

 

[wmbb]

After a lot of hours searching the internet I found the solution.....
[URL unfurl="true"]http://www.office-loesung.de/ftopic245891_0_0_asc.php[/url]