XL 2019 Tester si Vba est protégé

job75

XLDnaute Barbatruc
Bonjour,

Il faut avoir coché l'option Accès approuvé au modèle d'objet du projet VBA (onglet Fichier-Options-Centre de gestion de la confidentialité-Paramètres...-Paramètres des macros).

Ensuite affectez cette macro au bouton :
VB:
Sub Test()
Dim VPC  As Object
On Error Resume Next
Set VPC = ThisWorkbook.VBProject.VBComponents
If Err Then MsgBox "VBAProject est protégé"
End Sub
A+
 

Nicolas JACQUIN

XLDnaute Occasionnel
Supporter XLD
Bonjour,
Si tu peux écrire,dans ton fichier,le code proposé par Job75 c'est qu'il n'est pas protégé 🤣
Bonjour Robert,

oui effectivement ça ne fonctionne pas, le but est d'ouvrir mon programme en paralelle ou de faire un xla, pour voir tout ce qui est protégé ou masqué dans le fichier traité.

Capture d’écran 2024-05-15 184628.jpg
 

Discussions similaires

Réponses
8
Affichages
235
  • Question
Microsoft 365 Listbox
Réponses
3
Affichages
277

Statistiques des forums

Discussions
312 558
Messages
2 089 595
Membres
104 216
dernier inscrit
zapiboss