Microsoft 365 Désactivation/activation Application.CommandBars("ply").Enabled

pat66

XLDnaute Impliqué
Bonjour Le forum,

merci d’examiner mon problème

Lorsque j'ouvre un classeur je lui demande de désactiver le clic droit sur les onglets avec :
Code:
Application.CommandBars("ply").Enabled = False

Lors de la fermeture, je souhaite que l'on ferme ce classeur systématiquement sans enregistrer (sauf si on utilise une macro spécifique facultative), les éventuelles modifications avec :

VB:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
MsgBox "Ce document n'est pas enregistrable, utilisez les boutons cet effet !", vbInformation, "Projet"
    Cancel = True
End Sub
'
et

Code:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Dim ret As Integer
    ret = MsgBox("Souhaitez vous fermer ce document ?", vbYesNo + vbInformation, "Projet")
    If ret = vbNo Then
    Cancel = True
    Else
   ThisWorkbook.Saved = True
   End If
   End Sub

Alors ma question est :
comment réactiver Application.CommandBars("ply").Enabled =true lors de la fermeture afin d'éviter que le clic droit reste désactivé pour les classeurs que je pourrais ouvrir ultérieurement.

Merci beaucoup pour votre aide et vos conseils !
 
Dernière édition:

pat66

XLDnaute Impliqué
Bonjour Le forum
Bonjour Franc58

J'ai testé ta proposition, hélas cela ne fonctionne pas et je viens de m'apercevoir que j'avais déjà, lors d’un post-précédent, demandé de l'aide pour résoudre ce problème qui est toujours resté insoluble à ce jour.

Désolé pour le dérangement...

Bonne journée à tous.
 
Dernière édition:

patricktoulon

XLDnaute Barbatruc
Bonjour
il y a pourtant plusieurs solutions
  1. tout simplement d'enregistrer le fichier en xltm
  2. enregistrer le fichier en lecture seule
  3. aller à information /protéger le classeur et choisir "marquer comme final"
  4. bloquer le menu enregistrer et enregistrer sous dans le backstage(ribbon customUI)
et bien d'autre encore
ma préférée étant le xltm (fichier model )qui ne nécessite aucune intervention de ta part

alors @pat66 tu va choisir quoi comme solution
 

patricktoulon

XLDnaute Barbatruc
re
Bon d'"accords c'est jeudi le debut de semaine a été difficile
alors je vais aller doucement
tu ne veux pas que l'on puisse enregistrer le document xltm sont des fichier model que l'on peut pas modifier
ensuite pour ta barre ply tu la remet true dans le before close c'est tout
punaise dur dur hein!!
aller il reste encore un jour et c'est le weekend 😂 😂 😂
 

Discussions similaires

Réponses
2
Affichages
322

Statistiques des forums

Discussions
313 198
Messages
2 096 141
Membres
106 505
dernier inscrit
ngomez