Private Sub Workbook_Open()
Dim Ce_Jour As Date
Dim Nom_Fic As String
'ici adapter le nom du fichier à ouvrir
Nom_Fic = "C:\test.xls"
Ce_Jour = Date
'ici adapter la cellule contenant la date
If Sheets("Feuil1").Range("A1").Value = Ce_Jour Then
Workbooks.Open (Nom_Fic)
End If
End Sub
Private Sub Workbook_Open()
Dim Ce_Jour As Date
Ce_Jour = Date
'ici adapter la cellule contenant la date
If Sheets("Feuil1").Range("A1").Value = Ce_Jour Then exit sub
Activeworkbook.close savechanges =false
end if
End Sub
Il n'y a pas d'autre alternative à mon avis... Excel tout seul ne sait pas faire ce genre de chose!Spitnolan08 à dit:Sur un PC allumé 24h/24h et 7j/7j, tu crées une tache planifiée en demandant l'ouverture de ton fichier Init tous les jours à 9h00 par exemple.
un classeur ne peut pas "facilement" "s'auto-ouvrir")