Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Outlook Heures de rappel des réunions (en VBA)

Heures de rappel des réunions (en VBA)

2 réponses
Avatar
JD
Bonjour et merci,


avec le code suivant j'obtiens le nom de tous les rendez-vous figurant
dans mon calendrier
Je voudrais connaitre l'heure de rappel de chaque rendez-vous (en VBA),
voir la modifier par code.

Quelle est la syntaxe pour lire et écrire cette info.


Merci d'avance

Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNamespace("MAPI")
Set myCalendar = myNameSpace.GetDefaultFolder(olFolderCalendar)

For i = 1 To myCalendar.Items.Count
Debug.Print myCalendar.Items(i)
Next i

--
Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Isabelle Prawitz
Bonjour !
Mettre la propriété ReminderSet à True, et affecter à ReminderMinutesBeforeStart le nombre de minutes désiré pour le rappel
avant le RDV.

Soit dans ta boucle :

myCalendar.Items(i).ReminderSet=True
myCalendar.Items(i).ReminderMinutesBeforeStart0 'pour rappel 30 minutes avant

A+
Isa

"JD" a écrit dans le message de news:
Bonjour et merci,


avec le code suivant j'obtiens le nom de tous les rendez-vous figurant dans mon calendrier
Je voudrais connaitre l'heure de rappel de chaque rendez-vous (en VBA), voir la modifier par code.

Quelle est la syntaxe pour lire et écrire cette info.


Merci d'avance

Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNamespace("MAPI")
Set myCalendar = myNameSpace.GetDefaultFolder(olFolderCalendar)

For i = 1 To myCalendar.Items.Count
Debug.Print myCalendar.Items(i)
Next i

--
Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net



Avatar
JD
Merci Beaucoup pour ces précisions. En fait, plus précisément, mon
souci est le suivant :
Quand on créé un RDV, on indique un rappel (par ex 30 min avant), et là
l'exemple que vous me donnez me permet de maitriser ces rappels.
Par contre quand un rendez-vous est dépassé, Outlook fait le rappel et
propose dans sa boite de faire disparaitre le RDV ou de le repousser à
30 min, 1 jour, 4 jours, etc...
Dans quelle propriété est stockée cette nouvelle date de rappel.

Merci encore




Isabelle Prawitz a pensé très fort :
Bonjour !
Mettre la propriété ReminderSet à True, et affecter à
ReminderMinutesBeforeStart le nombre de minutes désiré pour le rappel avant
le RDV.

Soit dans ta boucle :

myCalendar.Items(i).ReminderSet=True
myCalendar.Items(i).ReminderMinutesBeforeStart0 'pour rappel 30 minutes
avant

A+
Isa

"JD" a écrit dans le message de news:

Bonjour et merci,


avec le code suivant j'obtiens le nom de tous les rendez-vous figurant dans
mon calendrier
Je voudrais connaitre l'heure de rappel de chaque rendez-vous (en VBA),
voir la modifier par code.

Quelle est la syntaxe pour lire et écrire cette info.


Merci d'avance

Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNamespace("MAPI")
Set myCalendar = myNameSpace.GetDefaultFolder(olFolderCalendar)

For i = 1 To myCalendar.Items.Count
Debug.Print myCalendar.Items(i)
Next i

-- Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net




--
Ceci est une signature automatique de MesNews.
Site : http://www.mesnews.net