Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Outlook Identification d'une tâche via code vba

Identification d'une tâche via code vba

13 réponses
Avatar
Monkeytoo
Bonsoir à tous
je désire gérer (ajouter et supprimer) des tâches dans outlook
j'ai trouvé le code vba pour ajouter une tâche mais je voudrais pouvoir lui
assigner un identifiant unique (placer une valeur provenant d'un numéro
automatique)
afin que je puisse rechercher cette tâche par cet identifiant.
où pourrais-je trouver la liste des champs disponibles dans outlook (partie
tâche) ?
ces manip s'effectueraient à partir d'access.
merci d'avance
Signaler un problème avec ce contenu

10 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
1 2
Avatar
Isabelle Prawitz
Bonjour !
Utilise sa propriété EntryId, tu pourras récupérer la tâche par GetItemFromId du Namespace !
A+
Isa

"Monkeytoo" a écrit dans le message de news:
Bonsoir à tous
je désire gérer (ajouter et supprimer) des tâches dans outlook
j'ai trouvé le code vba pour ajouter une tâche mais je voudrais pouvoir lui
assigner un identifiant unique (placer une valeur provenant d'un numéro
automatique)
afin que je puisse rechercher cette tâche par cet identifiant.
où pourrais-je trouver la liste des champs disponibles dans outlook (partie
tâche) ?
ces manip s'effectueraient à partir d'access.
merci d'avance




Avatar
Monkeytoo
je vais essayer
merci d'avance
"Isabelle Prawitz" a écrit dans le message de news:
#
Bonjour !
Utilise sa propriété EntryId, tu pourras récupérer la tâche par
GetItemFromId du Namespace !

A+
Isa

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

Bonsoir à tous
je désire gérer (ajouter et supprimer) des tâches dans outlook
j'ai trouvé le code vba pour ajouter une tâche mais je voudrais pouvoir
lui


assigner un identifiant unique (placer une valeur provenant d'un numéro
automatique)
afin que je puisse rechercher cette tâche par cet identifiant.
où pourrais-je trouver la liste des champs disponibles dans outlook
(partie


tâche) ?
ces manip s'effectueraient à partir d'access.
merci d'avance








Avatar
Monkeytoo
j'ai une erreur de compilation du code que je ne comprends pas :
Impossible d'affecter à une propriété en lecture seule
voici le code qui s'arrête sur .entryID=Var_Histo_Ref :

Strsql = "SELECT * FROM ...

Set rst = CurrentDb.OpenRecordset(Strsql)
With rst
Set Ol_Appointment = Ol_App.CreateItem(olAppointmentItem)
Set OL_Task = Ol_App.CreateItem(olTaskItem)
VAR_DATE = Nz(.Fields("date_acte"))
VAR_DATE = Format(VAR_DATE, "dd-mmmm-yyyy")
Var_Heure = Nz(.Fields("acte_heure"))
Var_Histo_Ref = (.Fields("Histo_Ref"))
Var_IW_Objet = Nz(.Fields("type_contact"))
Var_IW_Memo = Nz(.Fields("Divers"))
Var_Duree = Nz(.Fields("agenda_duree_reelle"))
var_duration = (Hour(Var_Duree) * 60) + Minute(Var_Duree)
Var_Bien = Nz(.Fields("acte_ref_bien"))

With Ol_Appointment
.Subject = Var_IW_Objet & " " & Var_Bien
.Body = Var_IW_Memo
.EntryID = Var_Histo_Ref
.Location = Var_bien
.Duration = var_duration
.Start = VAR_DATE & " " & Var_Heure
.Save
End With
.MoveNext
Set Ol_Appointment = Nothing
Loop
End With
Set Ol_Appointment = Nothing
Set Ol_App = Nothing


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

je vais essayer
merci d'avance
"Isabelle Prawitz" a écrit dans le message de news:
#
Bonjour !
Utilise sa propriété EntryId, tu pourras récupérer la tâche par
GetItemFromId du Namespace !

A+
Isa

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

Bonsoir à tous
je désire gérer (ajouter et supprimer) des tâches dans outlook
j'ai trouvé le code vba pour ajouter une tâche mais je voudrais
pouvoir



lui
assigner un identifiant unique (placer une valeur provenant d'un
numéro



automatique)
afin que je puisse rechercher cette tâche par cet identifiant.
où pourrais-je trouver la liste des champs disponibles dans outlook
(partie


tâche) ?
ces manip s'effectueraient à partir d'access.
merci d'avance












Avatar
JièL Goubert
Bonjoir(c) Monkeytoo

ne manquerait-il pas un Nz à la ligne
Var_Histo_Ref =(.Fields("Histo_Ref"))

Var_Histo_Ref = Nz(.Fields("Histo_Ref"))

(pas testé)

--
JièL / Jean-Louis GOUBERT
vous souhaite une bonne et heureuse année 2005
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 11/01/2005 01:03 vous avez écrit ceci :
j'ai une erreur de compilation du code que je ne comprends pas :
Impossible d'affecter à une propriété en lecture seule
voici le code qui s'arrête sur .entryID=Var_Histo_Ref :

Strsql = "SELECT * FROM ...

Set rst = CurrentDb.OpenRecordset(Strsql)
With rst
Set Ol_Appointment = Ol_App.CreateItem(olAppointmentItem)
Set OL_Task = Ol_App.CreateItem(olTaskItem)
VAR_DATE = Nz(.Fields("date_acte"))
VAR_DATE = Format(VAR_DATE, "dd-mmmm-yyyy")
Var_Heure = Nz(.Fields("acte_heure"))
Var_Histo_Ref = (.Fields("Histo_Ref"))
Var_IW_Objet = Nz(.Fields("type_contact"))
Var_IW_Memo = Nz(.Fields("Divers"))
Var_Duree = Nz(.Fields("agenda_duree_reelle"))
var_duration = (Hour(Var_Duree) * 60) + Minute(Var_Duree)
Var_Bien = Nz(.Fields("acte_ref_bien"))

With Ol_Appointment
.Subject = Var_IW_Objet & " " & Var_Bien
.Body = Var_IW_Memo
.EntryID = Var_Histo_Ref
.Location = Var_bien
.Duration = var_duration
.Start = VAR_DATE & " " & Var_Heure
.Save
End With
.MoveNext
Set Ol_Appointment = Nothing
Loop
End With
Set Ol_Appointment = Nothing
Set Ol_App = Nothing


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


je vais essayer
merci d'avance
"Isabelle Prawitz" a écrit dans le message de news:
#

Bonjour !
Utilise sa propriété EntryId, tu pourras récupérer la tâche par


GetItemFromId du Namespace !

A+
Isa

"Monkeytoo" a écrit dans le message de


news:

Bonsoir à tous
je désire gérer (ajouter et supprimer) des tâches dans outlook
j'ai trouvé le code vba pour ajouter une tâche mais je voudrais




pouvoir

lui

assigner un identifiant unique (placer une valeur provenant d'un




numéro

automatique)
afin que je puisse rechercher cette tâche par cet identifiant.
où pourrais-je trouver la liste des champs disponibles dans outlook



(partie

tâche) ?
ces manip s'effectueraient à partir d'access.
merci d'avance















Avatar
Isabelle Prawitz
Bonjour !
EntryId est une propiété en lecture seule. Tu peux initialiser un champ de ta base avec sa valeur au moment de la création de
la tâche, et ensuite, pour retrouver cet élément, et le supprimer (ou le modifier), tu utilises GetItemFromId(NomDeTonChamp)
!
EntryId est la propriété qui permet de pointer sur un élément Outlook, son identifiant unique.
Espérant avoir été plus claire ;-)
A+
Isa

"Monkeytoo" a écrit dans le message de news:
j'ai une erreur de compilation du code que je ne comprends pas :
Impossible d'affecter à une propriété en lecture seule
voici le code qui s'arrête sur .entryID=Var_Histo_Ref :

Strsql = "SELECT * FROM ...

Set rst = CurrentDb.OpenRecordset(Strsql)
With rst
Set Ol_Appointment = Ol_App.CreateItem(olAppointmentItem)
Set OL_Task = Ol_App.CreateItem(olTaskItem)
VAR_DATE = Nz(.Fields("date_acte"))
VAR_DATE = Format(VAR_DATE, "dd-mmmm-yyyy")
Var_Heure = Nz(.Fields("acte_heure"))
Var_Histo_Ref = (.Fields("Histo_Ref"))
Var_IW_Objet = Nz(.Fields("type_contact"))
Var_IW_Memo = Nz(.Fields("Divers"))
Var_Duree = Nz(.Fields("agenda_duree_reelle"))
var_duration = (Hour(Var_Duree) * 60) + Minute(Var_Duree)
Var_Bien = Nz(.Fields("acte_ref_bien"))

With Ol_Appointment
.Subject = Var_IW_Objet & " " & Var_Bien
.Body = Var_IW_Memo
.EntryID = Var_Histo_Ref
.Location = Var_bien
.Duration = var_duration
.Start = VAR_DATE & " " & Var_Heure
.Save
End With
.MoveNext
Set Ol_Appointment = Nothing
Loop
End With
Set Ol_Appointment = Nothing
Set Ol_App = Nothing


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

je vais essayer
merci d'avance
"Isabelle Prawitz" a écrit dans le message de news:
#
Bonjour !
Utilise sa propriété EntryId, tu pourras récupérer la tâche par
GetItemFromId du Namespace !

A+
Isa

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

Bonsoir à tous
je désire gérer (ajouter et supprimer) des tâches dans outlook
j'ai trouvé le code vba pour ajouter une tâche mais je voudrais
pouvoir



lui
assigner un identifiant unique (placer une valeur provenant d'un
numéro



automatique)
afin que je puisse rechercher cette tâche par cet identifiant.
où pourrais-je trouver la liste des champs disponibles dans outlook
(partie


tâche) ?
ces manip s'effectueraient à partir d'access.
merci d'avance
















Avatar
JièL Goubert
Bonjoir(c) Isabelle Prawitz

comme quoi je devrais continuer de m'abstenir de répondre quand ça cause
de programmation ;-)))
chacun son truc

--
JièL / Jean-Louis GOUBERT
vous souhaite une bonne et heureuse année 2005
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 11/01/2005 16:33 vous avez écrit ceci :
Bonjour !
EntryId est une propiété en lecture seule. Tu peux initialiser un champ de ta base avec sa valeur au moment de la création de
la tâche, et ensuite, pour retrouver cet élément, et le supprimer (ou le modifier), tu utilises GetItemFromId(NomDeTonChamp)
!
EntryId est la propriété qui permet de pointer sur un élément Outlook, son identifiant unique.
Espérant avoir été plus claire ;-)
A+
Isa


Avatar
Isabelle Prawitz
Meuh non !
C'est pas ce que je voulais dire ! ;-)
D'ailleurs tu remarqueras que j'ai répondu à Monkeytoo, et pas sur ta réponse !!!;-)))
A+ ;-)))
Isa

"JièL Goubert" a écrit dans le message de
news:uYloRa$
Bonjoir(c) Isabelle Prawitz

comme quoi je devrais continuer de m'abstenir de répondre quand ça cause
de programmation ;-)))
chacun son truc

--
JièL / Jean-Louis GOUBERT
vous souhaite une bonne et heureuse année 2005
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 11/01/2005 16:33 vous avez écrit ceci :
Bonjour !
EntryId est une propiété en lecture seule. Tu peux initialiser un champ de ta base avec sa valeur au moment de la
création de


la tâche, et ensuite, pour retrouver cet élément, et le supprimer (ou le modifier), tu utilises
GetItemFromId(NomDeTonChamp)


!
EntryId est la propriété qui permet de pointer sur un élément Outlook, son identifiant unique.
Espérant avoir été plus claire ;-)
A+
Isa




Avatar
JièL Goubert
Bonjoir(c) Isabelle Prawitz

ah pas peur, je suis pas vésqué ;-) du tout
et je te remercie sincèrement d'avoir corrigé mon ânerie

A+

--
JièL / Jean-Louis GOUBERT
vous souhaite une bonne et heureuse année 2005
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 11/01/2005 17:10 vous avez écrit ceci :
Meuh non !
C'est pas ce que je voulais dire ! ;-)
D'ailleurs tu remarqueras que j'ai répondu à Monkeytoo, et pas sur ta réponse !!!;-)))
A+ ;-)))
Isa

"JièL Goubert" a écrit dans le message de
news:uYloRa$

Bonjoir(c) Isabelle Prawitz

comme quoi je devrais continuer de m'abstenir de répondre quand ça cause
de programmation ;-)))
chacun son truc




Avatar
Monkeytoo
je vous remercie de vos réponses
je vais tester

"JièL Goubert" a écrit dans le
message de news: OJdzSCA#
Bonjoir(c) Isabelle Prawitz

ah pas peur, je suis pas vésqué ;-) du tout
et je te remercie sincèrement d'avoir corrigé mon ânerie

A+

--
JièL / Jean-Louis GOUBERT
vous souhaite une bonne et heureuse année 2005
La FAQ Outlook est la : http://faq.outlook.free.fr/

Le 11/01/2005 17:10 vous avez écrit ceci :
Meuh non !
C'est pas ce que je voulais dire ! ;-)
D'ailleurs tu remarqueras que j'ai répondu à Monkeytoo, et pas sur ta
réponse !!!;-)))


A+ ;-)))
Isa

"JièL Goubert" a écrit dans le
message de


news:uYloRa$

Bonjoir(c) Isabelle Prawitz

comme quoi je devrais continuer de m'abstenir de répondre quand ça cause
de programmation ;-)))
chacun son truc






Avatar
Monkeytoo
Bonsoir
pourriez-vous me dire par quel code je peux récupérer la valeur de cet
entryid pour le placer dans un champs de ma base ?
j'ai essayé mais access se plante à chaque fois sans message d'erreur
code :
With Ol_Appointment
.Subject = Var_IW_Objet & " " & Var_Bien
Var_IW_Bien_Reference = .EntryID


"Isabelle Prawitz" a écrit dans le message de news:
ua3PkL$
Bonjour !
EntryId est une propiété en lecture seule. Tu peux initialiser un champ de
ta base avec sa valeur au moment de la création de

la tâche, et ensuite, pour retrouver cet élément, et le supprimer (ou le
modifier), tu utilises GetItemFromId(NomDeTonChamp)

!
EntryId est la propriété qui permet de pointer sur un élément Outlook, son
identifiant unique.

Espérant avoir été plus claire ;-)
A+
Isa

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

j'ai une erreur de compilation du code que je ne comprends pas :
Impossible d'affecter à une propriété en lecture seule
voici le code qui s'arrête sur .entryID=Var_Histo_Ref :

Strsql = "SELECT * FROM ...

Set rst = CurrentDb.OpenRecordset(Strsql)
With rst
Set Ol_Appointment = Ol_App.CreateItem(olAppointmentItem)
Set OL_Task = Ol_App.CreateItem(olTaskItem)
VAR_DATE = Nz(.Fields("date_acte"))
VAR_DATE = Format(VAR_DATE, "dd-mmmm-yyyy")
Var_Heure = Nz(.Fields("acte_heure"))
Var_Histo_Ref = (.Fields("Histo_Ref"))
Var_IW_Objet = Nz(.Fields("type_contact"))
Var_IW_Memo = Nz(.Fields("Divers"))
Var_Duree = Nz(.Fields("agenda_duree_reelle"))
var_duration = (Hour(Var_Duree) * 60) +
Minute(Var_Duree)


Var_Bien = Nz(.Fields("acte_ref_bien"))

With Ol_Appointment
.Subject = Var_IW_Objet & " " & Var_Bien
.Body = Var_IW_Memo
.EntryID = Var_Histo_Ref
.Location = Var_bien
.Duration = var_duration
.Start = VAR_DATE & " " & Var_Heure
.Save
End With
.MoveNext
Set Ol_Appointment = Nothing
Loop
End With
Set Ol_Appointment = Nothing
Set Ol_App = Nothing


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

je vais essayer
merci d'avance
"Isabelle Prawitz" a écrit dans le message de
news:



#
Bonjour !
Utilise sa propriété EntryId, tu pourras récupérer la tâche par
GetItemFromId du Namespace !

A+
Isa

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

Bonsoir à tous
je désire gérer (ajouter et supprimer) des tâches dans outlook
j'ai trouvé le code vba pour ajouter une tâche mais je voudrais
pouvoir



lui
assigner un identifiant unique (placer une valeur provenant d'un
numéro



automatique)
afin que je puisse rechercher cette tâche par cet identifiant.
où pourrais-je trouver la liste des champs disponibles dans
outlook





(partie
tâche) ?
ces manip s'effectueraient à partir d'access.
merci d'avance




















1 2