Action a louverture d'outlook vba
Résolu
Berorn
Messages postés
30
Date d'inscription
Statut
Membre
Dernière intervention
-
Berorn Messages postés 30 Date d'inscription Statut Membre Dernière intervention -
Berorn Messages postés 30 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Action a louverture d'outlook vba
- Action - Guide
- Télécharger film d'action gratuitement et rapidement - Télécharger - TV & Vidéo
- Action fans - Accueil - Guide arnaque
- Vous devez disposer d'une autorisation pour effectuer cette action - Guide
- Concurrent action - Guide
2 réponses
Bonjour,
on devrait pouvoir l'inscrire dans une tâche, mais vu que je ne connais pas les macros outlook pour créer, tester puis supprimer le lendemain, je préfère créer un fichier texte avec la date de dernière exécution.
Fait sur excel, non testé sur outlook :
eric
on devrait pouvoir l'inscrire dans une tâche, mais vu que je ne connais pas les macros outlook pour créer, tester puis supprimer le lendemain, je préfère créer un fichier texte avec la date de dernière exécution.
Fait sur excel, non testé sur outlook :
Private Sub Application_Startup()
Dim numfich As Integer, i As String
If Dir("c:\tmp", 16) = "" Then MkDir "c:\tmp"
' lecture date
numfich = FreeFile
On Error GoTo suite
Open "c:\tmp\dateOutlook.txt" For Input Lock Read Write As #numfich
On Error GoTo 0
Input #numfich, i
Close #numfich
suite:
On Error GoTo 0
If i <> Format(Date, "dd/mm/yyyy") Then
' ta macro
'...
' ecriture date
numfich = FreeFile
Open "c:\tmp\dateOutlook.txt" For Output Lock Read Write As #numfich
Print #numfich, Date
Close #numfich
End If
End Sub
eric