Date d'expiration d'un fichier Excel 2010

Steve-2014 -  
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
    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
    1. eriiic Contributeur
      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
        Bonjour,

        C'eut ete plus juste en effet.

        Merci
        0
      2. eriiic Contributeur
        Au fait, ces protections sont illusoires.
        Il suffit d'interdire les macros et de les modifier.
        eric
        0
      3. f894009
        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

    Discussions similaires

    question pix mot caché
    aorum10

    7 réponses