Effacer une page à une date choisie

Bonsoir le forum,

Pouvez vous me dire si il existe une méthode pour effacer une page ou une formule à une date choisie?

Merci d'avance pour votre aide

Cordialement

Sdenis92

L'effacer quand ? A l'ouverture du fichier ? Si oui, il suffit de créer un macro évenementielle qui teste si la date est passée et si elle est passée, supprime ta feuille ou ta formule.

Bonjour,

En fait je souhaiterai effacer une feuille à une date donnée. Par exemple qu'au 01/07/2014 l'onglet "1er semestre" s'efface tout seul à l'ouverture du fichier.

Cordialement

Sdenis92

A mettre dans le module thisworkbook

Private Sub Workbook_Open()
If Date <= CDate("01/07/2014") Then
Application.DisplayAlerts = False
Sheets("1er Semestre").Delete
Application.DisplayAlerts = True
End If
End Sub

C'est top, merci beaucoup, c'est exactement ce que je cherchais.

Merci encore pour ce forum.

cordialement

Sdenis92