Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

demande de code pour ouvrir fichier apres une date passée

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 !

Re : demande de code pour ouvrir fichier apres une date passée

Bonjour,

Penser que l'on puisse protéger efficacement un fichier Excel est utopique. Il existe beaucoup de petits programmes pour casser la protection d'un classeur et du verrouillage du code VBA.
Tu peux toujours faire un truc du genre, pour protéger les feuilles et classeur si les utilisateurs sont novices :
Code:
Private Sub Workbook_Open()

    Dim Fe As Worksheet
    
    If Date > DateValue("01/02/2016") Then
    
        For Each Fe In Worksheets: Fe.Protect "MonMotDePasse": Next Fe
        ThisWorkbook.Protect "MonMotDePasse"
        
    End If
    
End Sub
Il te faut aussi protéger le projet VBA : "Outils"-->"Propriétés de VBAProject..."-->Onglet "Protection"-->Cocher "Verrouiller le projet pour l'affichage"-->Entrer le mot de passe (2 fois) enregistrer le classeur, le refermer et voir à l'ouverture si le projet est bien verrouillé.
Tu peux aussi obfusquer le code (le rendre illisible) fais des recherche pour avoir une idée de quoi ça parle.
 
Re : demande de code pour ouvrir fichier apres une date passée

Bonjour al1.2loin,

le fichier en retour
j'ai changé la date limite ( le 1/12/2015) pour pouvoir tester directement sans devoir attendre le 1er février
le mot de passe est toto (en minuscules)

Ne pas oublier de protéger les macros pour les rendre inaccessibles
en ne perdant pas de vue que les protections sur Excel ne valent pas grand'chose

à+
Philippe
 

Pièces jointes

- 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

  • Question Question
Microsoft 365 format date
Réponses
3
Affichages
199
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…