Microsoft 365 vérouillage dévérouillage feuille

farid · 1 Octobre 2021

Bonsoir,
En PJ , mon fichier avec avec macro de déverrouillage et verrouillage feuilles .En feuille1 2 boutons , rouge pour verrouiller pas de soucie et en vert bouton pour déverrouiller et le soucie a chaque déverrouillage , je vais automatiquement sur la feuille 6 et je souhaite lors du déverrouillage rester sur la feuille 1.
j'espère que la demande est explicite.
par avance, merci

sylvanu · 1 Octobre 2021

Bonsoir Farid,
Sur Xl2007 on reste bien sur la feuille 1.
Mais dans le cas contraire, essayez cela :

VB:

Sub DéProtéger()
Dim ws As Worksheet
For Each ws In Sheets
ws.Unprotect
Next
Sheets("Feuil1").Activate
End Sub

sylvanu · 1 Octobre 2021

Bonsoir Farid,
Sur Xl2007 on reste bien sur la feuille 1.
Mais dans le cas contraire, essayez cela :

VB:

Sub DéProtéger()
Dim ws As Worksheet
For Each ws In Sheets
ws.Unprotect
Next
Sheets("Feuil1").Activate
End Sub

farid · 1 Octobre 2021

sylvanu à dit:
Bonsoir Farid,
Sur Xl2007 on reste bien sur la feuille 1.
Mais dans le cas contraire, essayez cela :

VB:

Sub DéProtéger() Dim ws As Worksheet For Each ws In Sheets ws.Unprotect Next Sheets("Feuil1").Activate End Sub

Bonjour Sylvanu
Plaisir de vous revoir,
je ne comprends pas , je suis sur office 365 pro ,.
merci pour la solution qui fonctionne tres bien comme d'habitude.
bonne soirée
merci beaucoup

Bernard_XLD · 2 Octobre 2021

Bonjour Farid, sylvanu, le forum

farid à dit:
En PJ , mon fichier avec avec macro de déverrouillage et verrouillage feuilles .En feuille1 2 boutons , rouge pour verrouiller pas de soucie et en vert bouton pour déverrouiller et le soucie a chaque déverrouillage , je vais automatiquement sur la feuille 6 et je souhaite lors du déverrouillage rester sur la feuille 1.

Je confirme le même comportement sous 365 famille

Bien cordialement, @+

Bernard_XLD · 2 Octobre 2021

Re,

C'est lié à l'objet dessiné, même comportement aberrant avec un contrôle de formulaire, pas de problème par contre avec un contrôle ActiveX ou en appel direct

Bien cordialement, @+.

sylvanu · 2 Octobre 2021

Re,
Serait ce un bug sur 365 ?
Et pourquoi la feuille 6, ce n'est même pas la dernière.

Bernard_XLD · 2 Octobre 2021

re,

quel que soit le nombre de feuille, c'est toujours l'avant dernière sélectionnée, selon l'ordre d'affichage et non l'index, et uniquement si la déprotection est effective, le code exécuté sur des feuilles non protégées ne change pas la sélection.
Et le problème ne survient qu'avec des formes ou des contrôles de formulaire.
Pour moi, bug 365, un de plus !

Bien cordialement, @

Microsoft 365 vérouillage dévérouillage feuille

farid

XLDnaute Occasionnel

Pièces jointes

sylvanu

sylvanu

XLDnaute Barbatruc

farid

XLDnaute Occasionnel

Bernard_XLD

XLDnaute Barbatruc

Bernard_XLD

XLDnaute Barbatruc

sylvanu

XLDnaute Barbatruc

Bernard_XLD

XLDnaute Barbatruc

Discussions similaires