Discussion :

[jacque55]

Bonjour à tous,

Voila j'ai un petit challenge.

Je voudrais savoir si l'on peu faire une macro vba dans outlook.

Je m'explique une fois par semaine, j'ai un rdv dans mon agenda ou je dois ouvrir un logiciel se situant sur mon bureau. Je souhaite faire une macro dans outlook qui permet d'ouvrir automatiquement le logiciel dans mon agenda chaque semaine à la même heure. Voir photo. Le lien du logiciel est : C:\Temp\Rive.exe

Merci à tous,

Jacque

[Oliv-]

Bonjour
Nul besoin de macro il faut utiliser le planificateur de tâches de Windows

[jacque55]

Bonjour Oliv- ,

Peux tu m'expliquer la démarche à faire avec des capture d'écran ?

Ca serait super sympa..

Merci encore

[SfJ5Rpw8]

Bonjour,


voir : Créer une tâche planifiée sous Windows 7

[jacque55]

Merci pour le tuto, malheuresement je travail dans une societe ou j'ai beaucou beaucoup de protection et cela ne fonctionne pas car je n'ai pas acces à la session administrateur.

Du coup existe t-il une macro vba simple qui permet d'ouvrir mon logiciel situer sur mon bureau C:\Temp\Net.exe lorsque j'ai mon rdv qui arrive dans mon agenda dans outlook ?

Merci encore pour votre aide.

Jacque

[Oliv-]

Essaye cette commande pour lancer le planificateur
Taskschd.msc sur la ligne de recherche

ou sinon en ligne de commande : Schtasks.exe

Taper Schtasks.exe /? pour l'aide

[jacque55]

Merci Oliv- mais je n'y arrive pas.

Existe t-il une macro vba qui peux gérer ca dans outlook que tu connaisse du coup ?

Merci

[SfJ5Rpw8]

Il semble que tu abandonne bien vite ...!


il se passe quoi lorsque tu lance une des deux commandes proposées par Oliv-

[jacque55]

La tache j'arrive à la créer mais j'ai fait un test et rien ne se passe...

De plus dans afffiché toute les taches active, il ne l'enregistre pas j'ai l'impression...

A la base c'est vrai que je cherchais un moyen simple avec du code vba a mettre dans outlook de maniere simple si ca existe...

Jacque

[Oliv-]

Bonsoir,
Pour lancer un programme c'est effectivement assez simple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub lance_prog()
shellcommande = """C:\windows\system32\calc.exe"""
RetVal = Shell(shellcommande, 1)
End Sub

par contre pour le lancer à une date et heure précise

Soit on utilise "le planificateur de tache",

Soit on utilise Outlook et c'est beaucoup plus compliqué, il faut utiliser les taches et intercepter les RAPPELS

[jacque55]

Bonsoir Oliv,

Ta macro fonctionne à merveille par contre il faudrait la mettre directement sur mon rdv dans outlook mais je ne sais pas comment faire ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Sub lance_prog()
shellcommande = """C:\windows\system32\calc.exe"""
RetVal = Shell(shellcommande, 1)
End Sub

Le rdv dans outlook n'a t-il pas de nom précis pour que l'on puisse lui greffer cette macro ?

Merci encore pour ton aide précieuse.

Jacque

[Oliv-]

Essaye avec cela à mettre dans thisoutlooksession

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Application_Reminder(ByVal item As Object)
 
    If item.subject = "#go_calc" Then
        shellcommande = """C:\windows\system32\calc.exe"""
        RetVal = Shell(shellcommande, 1)
    End If
End Sub

ensuite il faut créer une tache périodique avec un RAPPEL dont le sujet est #go_calc

[jacque55]

Merci pour ton aide encore et encoer Oliv,

J'arrive à faire ma tache périodique intitulé "Devoirs" à 9H30 tous les mercredi en revanche je ne vois pas du tt ou il faut mettre #go_calc ??

Peux tu me faire des captures d'écran ?

Merci encore,

Jacque

[SfJ5Rpw8]

Bonjour,


regarde le code ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

item.subject = "#go_calc"

...


c'est le sujet de ton événement...

[jacque55]

Du coup ca serait :

item.subject = "#go_Devoirs" ?

Merci Oliv

[SfJ5Rpw8]

C'est surtout ce qui vas te permettre d'identifier ton événements ... cela peu aussi bien être

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

item.subject = "Lance mon programme EXE"

[Oliv-]

Salut à tous,

Le sujet de ta Tâche est celui que tu veux mais il faut que ce soit le même dans la macro
item.subject = "ce que tu veux" ?

En mettant un texte peu courant comme "#go_calc" cela évite que ta macro se déclenche lors d'un RAPPEL d'une tâche qui aurait le même nom.
!

[jacque55]

Salut Oliv,

J'ai copié ceci mais rien ne se passe quand le rendez vous viens...

Que faire ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Application_Reminder(ByVal item As Object)
 
    If item.subject = "#go_Net" Then
        shellcommande = """C:\Temp\Net.exe"""
        RetVal = Shell(shellcommande, 1)
    End If
End Sub

[Oliv-]

Bonsoir
Il faut respecter la casse . Et qu il ait bien un rappel sur le rdv