les icones classeur disparaissent

  • Initiateur de la discussion Initiateur de la discussion freefer
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

freefer

XLDnaute Nouveau
Bonjour,

Depuis que j'utilise le code suivant pour obliger les utilisateurs à passer par mon userform:

Sub No_Record()

ActiveWorkbook.Protect Windows:=True
With Application.CommandBars("Standard")
.Controls("Enre&gistrer").Enabled = False
End With
With Application.CommandBars("Worksheet Menu Bar")
.Controls("Fichier").Enabled = False
End With

'desactive le raccourci clavier Ctrl+S
Application.OnKey "^s", ""

End Sub

Sub Yes_Record()

ActiveWorkbook.Protect Windows:=False
With Application.CommandBars("Standard")
.Controls("Enre&gistrer").Enabled = True
End With
With Application.CommandBars("Worksheet Menu Bar")
.Controls("Fichier").Enabled = True
End With

'desactive le raccourci clavier Ctrl+S
Application.OnKey "^s"

End Sub

les icones croix, réduire et plain écran du classeur disparaissent aléatoirement tout en n'affichant pas les feuilles pleine fenêtre, et je n'ai plus la possibilité de modifier leurs taille (plus d'icones !).

Quel est le problème ?

Merci d'avance.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
2 K
Retour