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

date de peremption

ya_v_ka

XLDnaute Impliqué
salut

je pense que cela est possible, en tout cas pour une feuille, avec une fonction si (en VBA), lorque la date du jour est plus àlevée que la date de référence, ca supprime la feuille... pour le classeur je ne sais pas !

ca donnerait quelque chose comme ca :

Private Sub Workbook_Open()
Dim MyDate
MyDate = 38698 '12.12.2005
On Error Resume Next
If MyDate < Date Then
Application.DisplayAlerts = False
Worksheets('feuil3').Delete
Application.DisplayAlerts = True
End If
End Sub



ya'v

Message édité par: ya_v_ka, à: 11/12/2005 01:11
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…