Bonjour,

J'aimerai avoir un moyen simple et rapide de créer une réunion outlook qui sera toujours la même mis à part la date.

Du coup me suis fait une macro dans ce genre, (merci la FAQ) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Sub MaMacroDeCreationDeRDV()
 
    Dim app As Outlook.Application
    Dim meeting As Outlook.AppointmentItem
    Dim dateMeeting As Date
    Set app = Outlook.Application
    Set meeting = app.CreateItem(olAppointmentItem)
    dateMeeting = Date
 
    With meeting
        .MeetingStatus = olMeeting
        .Subject = "Sujet"
        .Location = "Salle XXX"
        .Start = dateMeeting
        .Duration = 30
        .Body = "Corps"
        .Recipients.Add ("mail@mail.com")
        .Display
        .Send
    End With
 
 
    Set app = Nothing
    Set meeting = Nothing
End Sub
Seulement, elle ne va fonctionner que sur mon poste... Or je voudrais qu'elle soit accessible à tous mes collègues simplement.
Le but étant d'avoir un fichier exécutable sur le réseau, qui ferai ce que fait cette marco, mais simplement en double cliquant dessus : création d'une réunion émise par celui qui a lancé le fichier/la macro/le script via Outlook.

Je n'ai pas trouvé grand chose dans ce sens, à part installer cette macro chez tout le monde ou la création d'un add in COM.
J'aimerai quelque chose de bien plus simple.

Le pire c'est que je sais que ça existe, j'ai déjà vu ce genre de script/batch/exécutable, mais pas moyen de remettre la main dessus.

Du coup je ne suis pas certain d'être dans le bon forum (vu que ce n'est apparemment pas par un macro qu'il faut que je passe), mais je suis preneur de toute piste.

Merci d'avance.