Problème de macro lors de l'association à un bouton

[Benjy51190]

Bonjour à toutes et tous et merci de vous attarder sur mon sujet.

Depuis la mise a jour de ma version d'office, l'une de mes macros pose problème:
Cette macro à pour but de déverrouiller ou verrouiller toutes les onglets de mon classeur, qui en compte 53.

Lorsque j'exécute directement ma macro dans le menu "Développeur", aucun problème, elle fonctionne très bien.

Mais lorsque j'associer la macro à un bouton, OK, son activation déverrouille bien mes pages, mais m'envoie directement à l'onglet n°52 (nommé "semaine51") sans que je ne sache pourquoi.
SI je supprime le dernier onglet de mon classeur, c'est à, dire le 53, il m'envoie dans ce cas à l'onglet 51 (nommé "semaine50").

Tableur en pièce jointe.
Detail de la macro en question:

Sub ProtectDeprotect()
Dim ws As Worksheet
For Each ws In Worksheets
Select Case ws.ProtectContents
Case True
ws.Unprotect
Case False
ws.Protect
End Select
Next
End Sub


Merci beaucoup par avance de votre aide

 

[Robert]

Bonjour Benjy, bonjour le forum,

Je n'ai pas ce problème chez moi. L'onglet actif reste toujours Analyse frequentation. Par conséquent, à la fin de la maco c'est toujours lui qui est actif. Vérifie avec ton code modifié :

Sub ProtectDeprotect()
Dim ws As Worksheet
Dim TXT As String

Application.ScreenUpdating = False
For Each ws In Worksheets
TXT = IIf(TXT = "", ActiveSheet.Name, TXT & Chr(13) & ActiveSheet.Name)
    Select Case ws.ProtectContents
        Case True
            ws.Unprotect
        Case False
            ws.Protect
    End Select
Next
MsgBox TXT
End Sub

 

[Benjy51190]

merci @Robert pour ta réponse.
le code modifié ne change pas le problème.
La macro exécutée, quelque soit l'onglet sur laquelle elle se trouve, me ramène toujours à l'onglet 52 ( "semaine51").
Il n'y a que si je l'utilise sur le dernier onglet du tableur (onglet 53: "semaine52) que je ne suis pas redirigé sur l'onglet 52.
Je n'arrive pas a comprendre pourquoi l'activation via un bouton pose problème alors que via le menu développeur, il n'y a aucun souci.