Bonjour,

Je voudrais que mon fichier Excel ne puisse être ouvert que sur un seul poste.
J'ai donc fait ce code en utilisant une clé de registre (TestKey de valeur 32) que j'ai créé sur le poste en question :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Private Sub Workbook_Open()
Securite = GetSetting("Section1", "Section2", "TestKey", Défaut)
If Securite = 32 Then
    MsgBox "Autorisé à lire ce fichier"
Else
    MsgBox "Vous n'êtes pas autorisé à lire ce fichier"
    ActiveWorkbook.Close False
End If
End Sub
Je me suis rendu compte que ce code ne servait à rien car il suffit que l'utilisateur désactive les macros pour l'ouvrir à moins de créér un certificat de sécurité...
Quelqu'un voit comment je pourrais résoudre mon problème sans certificat de sécurité?
Il doit falloire ne pas se servir des macros mais alors comment faire?

Merci de votre aide