Date d'expiration d'un fichier Excel 2010

Steve-2014 Messages postés 1 Statut Membre -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour !
j'ai un fichier Excel, et j'aimerais bien l'automatiser d'une date d'expiration...c'est à dire, par exemple on est le 06 Février 2014, je veux que ce fichier no fonctionne plus en 01 Mars 2014....
si quelqu'un peut m'aider s'il vous plait
:)

2 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    code a mettre dans VBA ThisWorkbook

    ici date d'aujord'hui

    Private Sub Workbook_Open()
    If Date = CDate("06/02/2014") Then
    Application.Quit
    End If
    End Sub
    0
  2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
     
    Bonjour à tous,

    différents exemples ici : http://www.cpearson.com/excel/WorkbookTimeBomb.aspx
    dont un 'suicide' : le fichier se détruit.

    @ f894009
    j'aurais mis >= non ?

    eric
    0
    1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Bonjour,

      C'eut ete plus juste en effet.

      Merci
      0
    2. eriiic Messages postés 24581 Date d'inscription   Statut Contributeur Dernière intervention   7 281
       
      Au fait, ces protections sont illusoires.
      Il suffit d'interdire les macros et de les modifier.
      eric
      0
    3. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Bonjour,

      En effet, s'il y a macro, entre autre, un simple maintient de la touche shift au lancement du fichier et c'est joue. Cependant, pas tout le monde au courrant
      0