Bloquer excel avec une date de fin utilisatio

Résolu
fiona-nanterre Messages postés 6 Date d'inscription   Statut Membre Dernière intervention   -  
fiona-nanterre Messages postés 6 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai besoin que vous m'aidiez à bloquer un fichier excel à partir d'une date de fin d'utilisation.
j'ai un fichier excel 2003 que je dois envoyer à quelques collaborateur cependant celui-ci ne doit plus etre utilisable à partir d'une date que j'insererais.

Merci pour votre aide

Fiona
A voir également:

4 réponses

Réponse 1 / 4
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Salut,

Une possibilté.
Tu peux mettre dans l'evennement workbook_open un code pour tester la date
Voici un exemple.
Private Sub Workbook_Open()
  Dim dd As Date
  dd = Date
  If dd = #3/27/2009# Then MsgBox "fin d'utilisation"
End Sub
A la place de MsgBox tu pourras mettre un mot de passe avec un Inputbox.
1
Réponse 2 / 4
lami20j Messages postés 21331 Date d'inscription   Statut Modérateur, Contributeur sécurité Dernière intervention   3 570
 
Re,

Tu vas dans le menu Outils / Macros / Visual Basic editorDans la fênetre qui s'ouvre tu verras une arborescence. Ton classeur (workbook correspondra à un projet) tu le verras comme ça VBAProject(tonclasseur.xls).

Dans le dossier MicrosoftExcelObjects tu verras ThisWorkbook.
Tu ferras double clic sur lui et ensuite tu mettras ce code
Private Sub Workbook_Open()
    Dim dd As Date
    dd = Date
    If dd = #3/27/2009# Then
        rep = InputBox("Nous sommes le " & dd & vbCrLf & "Entrez le mot de passe", "Connexion")
        Do While rep <> "a"
            rep = InputBox("Nous sommes le " & dd & vbCrLf & "Entrez le mot de passe", "Connexion")
        Loop
    End If
End Sub
Le mot de passe est a
Tu peux mettre un mot de passe pour le projet vba, pour que le code ne soit pas vu par les autres utilisateurs.
Malheuresement je ne peux pas t'envoyer le classeru exemple, au boulot je n'ai pas accès aux serveurs de genre cjoint.
1
Réponse 3 / 4
fiona-nanterre Messages postés 6 Date d'inscription   Statut Membre Dernière intervention  
 
Merci beaucoup Lami20j, cependant peux tu m indiquer ou est ce que je dois mettre cette macro s'il te plait j 'ai un peu beaucoup de mal.
Encore merci pour ton aide
Fiona
0
Réponse 4 / 4
fiona-nanterre Messages postés 6 Date d'inscription   Statut Membre Dernière intervention  
 
Merci , merci Lamij20, t est le meilleur.
ta solution marche à merveille combiner au mot de passe.
J'ai fait le test en jouant sur la date systéme, en effet cela bloque le fichier en demandant un mot de passe pour l'utiliser.
ENCORE MERCIIIIIIIIIIIIII
0