Je suis au départ sous ACCESS 2000 - Je souhaite copier une valeur dans le
clipboard
puis ouvrir Le calendrier Outlook ( ou toute l'appli Outlook) pour pouvoir
faire un copier
(manuel) de ma valeur.
Problème : comment rendre la fenetre Outlook visible ?
ps mon code Acces fonctionne avec Get ou Create si Outlook n'est pas ouvert.
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
Alain TEYSSEDRE
Bon pour l'instant j'avance tout seul ...je croyais qu'il y avait des experts Outlook sur ce Forum ? (pour info j'ai aussi essayé le forum Access qui m'a indiqué des pistes mais qui ne maitrise pas totalement Outlook)
Je suis arrivé à rendre ma fenetre visible avec le code suivant:
Dim OlApp As Outlook.Application Dim OlMapi As Outlook.NameSpace Dim OlFolder As Outlook.MAPIFolder
Set OlApp = GetObject(, "Outlook.application")
Set OlMapi = OlApp.GetNamespace("MAPI") Set OlFolder = OlMapi.GetDefaultFolder(olFolderCalendar) OlFolder.Display
Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre outlook avec le Calendar ?
en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il affiche la fenetre Calendar dans l'Outloo déja ouvert .
merci pour votre aide
@+ Alain
"Alain TEYSSEDRE" a écrit dans le message de news:
Bonjour
Je suis au départ sous ACCESS 2000 - Je souhaite copier une valeur dans le clipboard puis ouvrir Le calendrier Outlook ( ou toute l'appli Outlook) pour pouvoir faire un copier (manuel) de ma valeur.
Problème : comment rendre la fenetre Outlook visible ?
ps mon code Acces fonctionne avec Get ou Create si Outlook n'est pas ouvert.
Dim OL_App As Outlook.Application
Set OL_App = GetObject(, "Outlook.application")
merci pour votre aide
Alain
Bon pour l'instant j'avance tout seul ...je croyais qu'il y avait des
experts Outlook sur ce Forum ?
(pour info j'ai aussi essayé le forum Access qui m'a indiqué des pistes mais
qui ne maitrise pas
totalement Outlook)
Je suis arrivé à rendre ma fenetre visible avec le code suivant:
Dim OlApp As Outlook.Application
Dim OlMapi As Outlook.NameSpace
Dim OlFolder As Outlook.MAPIFolder
Set OlApp = GetObject(, "Outlook.application")
Set OlMapi = OlApp.GetNamespace("MAPI")
Set OlFolder = OlMapi.GetDefaultFolder(olFolderCalendar)
OlFolder.Display
Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre
outlook avec le Calendar ?
en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il
affiche la fenetre Calendar dans l'Outloo déja ouvert .
merci pour votre aide
@+
Alain
"Alain TEYSSEDRE" <alain.teyssedre-NoSpam@libertysurf.fr> a écrit dans le
message de news:ukTrCbBsDHA.3552@TK2MSFTNGP11.phx.gbl...
Bonjour
Je suis au départ sous ACCESS 2000 - Je souhaite copier une valeur dans le
clipboard
puis ouvrir Le calendrier Outlook ( ou toute l'appli Outlook) pour pouvoir
faire un copier
(manuel) de ma valeur.
Problème : comment rendre la fenetre Outlook visible ?
ps mon code Acces fonctionne avec Get ou Create si Outlook n'est pas
ouvert.
Bon pour l'instant j'avance tout seul ...je croyais qu'il y avait des experts Outlook sur ce Forum ? (pour info j'ai aussi essayé le forum Access qui m'a indiqué des pistes mais qui ne maitrise pas totalement Outlook)
Je suis arrivé à rendre ma fenetre visible avec le code suivant:
Dim OlApp As Outlook.Application Dim OlMapi As Outlook.NameSpace Dim OlFolder As Outlook.MAPIFolder
Set OlApp = GetObject(, "Outlook.application")
Set OlMapi = OlApp.GetNamespace("MAPI") Set OlFolder = OlMapi.GetDefaultFolder(olFolderCalendar) OlFolder.Display
Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre outlook avec le Calendar ?
en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il affiche la fenetre Calendar dans l'Outloo déja ouvert .
merci pour votre aide
@+ Alain
"Alain TEYSSEDRE" a écrit dans le message de news:
Bonjour
Je suis au départ sous ACCESS 2000 - Je souhaite copier une valeur dans le clipboard puis ouvrir Le calendrier Outlook ( ou toute l'appli Outlook) pour pouvoir faire un copier (manuel) de ma valeur.
Problème : comment rendre la fenetre Outlook visible ?
ps mon code Acces fonctionne avec Get ou Create si Outlook n'est pas ouvert.
Dim OL_App As Outlook.Application
Set OL_App = GetObject(, "Outlook.application")
merci pour votre aide
Alain
Anor
Bonjour Alain
Alain TEYSSEDRE :
| Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre | outlook avec le Calendar ? | | en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il | affiche la fenetre Calendar dans l'Outloo déja ouvert . |
Effectivement, Automation ne sait pas utiliser une instance d'Outlook qu'il n'a pas ouverte lui-même.
Il va falloir se replonger dans la doc pour comprendre la différence entre les méthodes GetObject et CreateObject, outre le fait que :
createobject crée une instance à condition que outlook soit déjà ouvert tandis que getobject refusera de s'exécuter si outlook est fermé.
Essaye ceci pour afficher un message, peut-être que tu arriveras à détourner le code pour faire ce que tu souhaites.
Sub test() Dim OlApp As Outlook.Application Set OlApp = GetObject(, "Outlook.application") OlApp.CreateItem(olMailItem).display Set OlApp = Nothing End Sub -- à+ Arnaud -------------------------------------------------- Access Memorandum - http://memoaccess.free.fr ## Réponses souhaitées sur ce forum, merci. ## --------------------------------------------------
| Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre
| outlook avec le Calendar ?
|
| en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il
| affiche la fenetre Calendar dans l'Outloo déja ouvert .
|
Effectivement, Automation ne sait pas utiliser une instance d'Outlook
qu'il n'a pas ouverte lui-même.
Il va falloir se replonger dans la doc pour comprendre la différence entre
les méthodes GetObject et CreateObject, outre le fait que :
createobject crée une instance à condition que outlook soit déjà ouvert
tandis que
getobject refusera de s'exécuter si outlook est fermé.
Essaye ceci pour afficher un message,
peut-être que tu arriveras à détourner le code pour faire ce que tu souhaites.
Sub test()
Dim OlApp As Outlook.Application
Set OlApp = GetObject(, "Outlook.application")
OlApp.CreateItem(olMailItem).display
Set OlApp = Nothing
End Sub
--
à+
Arnaud
--------------------------------------------------
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------
| Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre | outlook avec le Calendar ? | | en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il | affiche la fenetre Calendar dans l'Outloo déja ouvert . |
Effectivement, Automation ne sait pas utiliser une instance d'Outlook qu'il n'a pas ouverte lui-même.
Il va falloir se replonger dans la doc pour comprendre la différence entre les méthodes GetObject et CreateObject, outre le fait que :
createobject crée une instance à condition que outlook soit déjà ouvert tandis que getobject refusera de s'exécuter si outlook est fermé.
Essaye ceci pour afficher un message, peut-être que tu arriveras à détourner le code pour faire ce que tu souhaites.
Sub test() Dim OlApp As Outlook.Application Set OlApp = GetObject(, "Outlook.application") OlApp.CreateItem(olMailItem).display Set OlApp = Nothing End Sub -- à+ Arnaud -------------------------------------------------- Access Memorandum - http://memoaccess.free.fr ## Réponses souhaitées sur ce forum, merci. ## --------------------------------------------------
Alain TEYSSEDRE
Bonjour Arnaud
Comme tu vois j'arpente les newsgroup ...
Finalement je suis arrivé à ouvrir mon Calendar (c'est ce que je souhaitais) et effectivement que je fasse Create ou Get c'est pareil (comme tu disais Automation ne sait pas utiliser l'instance active) ... donc j'ai le code suivant:
Dim OlApp As Outlook.Application Dim OlMapi As Outlook.NameSpace Dim OlFolder As Outlook.MAPIFolder
Set OlApp = Outlook.Application ' Set OlMapi = OlApp.GetNamespace("MAPI") Set OlFolder = OlMapi.GetDefaultFolder(olFolderCalendar) OlFolder.Display
Je te rappelle que mon objectif c'est copier une valeur dans le clipboard pour la coller dans le Calendar Outlook. Ce qui reste incomprehensible pour moi c'est que parfois ça marche (j'arrive à la copier la valeur) parfois ça ne marche pas (je n'ai plus la fonction coller accessible dans Outlook) et impossible d'en détecter la raison.
si tu as des idées ...
@+
Alain
"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de news:3fbe648a$0$28636$
Bonjour Alain
Alain TEYSSEDRE :
| Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre | outlook avec le Calendar ? | | en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il | affiche la fenetre Calendar dans l'Outloo déja ouvert . |
Effectivement, Automation ne sait pas utiliser une instance d'Outlook qu'il n'a pas ouverte lui-même.
Il va falloir se replonger dans la doc pour comprendre la différence entre les méthodes GetObject et CreateObject, outre le fait que :
createobject crée une instance à condition que outlook soit déjà ouvert tandis que getobject refusera de s'exécuter si outlook est fermé.
Essaye ceci pour afficher un message, peut-être que tu arriveras à détourner le code pour faire ce que tu souhaites.
Sub test() Dim OlApp As Outlook.Application Set OlApp = GetObject(, "Outlook.application") OlApp.CreateItem(olMailItem).display Set OlApp = Nothing End Sub -- à+ Arnaud -------------------------------------------------- Access Memorandum - http://memoaccess.free.fr ## Réponses souhaitées sur ce forum, merci. ## --------------------------------------------------
Bonjour Arnaud
Comme tu vois j'arpente les newsgroup ...
Finalement je suis arrivé à ouvrir mon Calendar (c'est ce que je souhaitais)
et effectivement que je fasse
Create ou Get c'est pareil (comme tu disais Automation ne sait pas utiliser
l'instance active) ...
donc j'ai le code suivant:
Dim OlApp As Outlook.Application
Dim OlMapi As Outlook.NameSpace
Dim OlFolder As Outlook.MAPIFolder
Set OlApp = Outlook.Application '
Set OlMapi = OlApp.GetNamespace("MAPI")
Set OlFolder = OlMapi.GetDefaultFolder(olFolderCalendar)
OlFolder.Display
Je te rappelle que mon objectif c'est copier une valeur dans le clipboard
pour
la coller dans le Calendar Outlook.
Ce qui reste incomprehensible pour moi c'est que parfois ça marche
(j'arrive à la copier la valeur)
parfois ça ne marche pas (je n'ai plus la fonction coller accessible dans
Outlook) et impossible
d'en détecter la raison.
si tu as des idées ...
@+
Alain
"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de
news:3fbe648a$0$28636$636a55ce@news.free.fr...
| Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre
| outlook avec le Calendar ?
|
| en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il
| affiche la fenetre Calendar dans l'Outloo déja ouvert .
|
Effectivement, Automation ne sait pas utiliser une instance d'Outlook
qu'il n'a pas ouverte lui-même.
Il va falloir se replonger dans la doc pour comprendre la différence entre
les méthodes GetObject et CreateObject, outre le fait que :
createobject crée une instance à condition que outlook soit déjà ouvert
tandis que
getobject refusera de s'exécuter si outlook est fermé.
Essaye ceci pour afficher un message,
peut-être que tu arriveras à détourner le code pour faire ce que tu
souhaites.
Sub test()
Dim OlApp As Outlook.Application
Set OlApp = GetObject(, "Outlook.application")
OlApp.CreateItem(olMailItem).display
Set OlApp = Nothing
End Sub
--
à+
Arnaud
--------------------------------------------------
Access Memorandum - http://memoaccess.free.fr
## Réponses souhaitées sur ce forum, merci. ##
--------------------------------------------------
Finalement je suis arrivé à ouvrir mon Calendar (c'est ce que je souhaitais) et effectivement que je fasse Create ou Get c'est pareil (comme tu disais Automation ne sait pas utiliser l'instance active) ... donc j'ai le code suivant:
Dim OlApp As Outlook.Application Dim OlMapi As Outlook.NameSpace Dim OlFolder As Outlook.MAPIFolder
Set OlApp = Outlook.Application ' Set OlMapi = OlApp.GetNamespace("MAPI") Set OlFolder = OlMapi.GetDefaultFolder(olFolderCalendar) OlFolder.Display
Je te rappelle que mon objectif c'est copier une valeur dans le clipboard pour la coller dans le Calendar Outlook. Ce qui reste incomprehensible pour moi c'est que parfois ça marche (j'arrive à la copier la valeur) parfois ça ne marche pas (je n'ai plus la fonction coller accessible dans Outlook) et impossible d'en détecter la raison.
si tu as des idées ...
@+
Alain
"Anor" <http://memoaccess.free.fr/anor/email.htm> a écrit dans le message de news:3fbe648a$0$28636$
Bonjour Alain
Alain TEYSSEDRE :
| Ce que je ne comprends pas c'est pourquoi il m'ouvre une autre fenetre | outlook avec le Calendar ? | | en fait j'aimerai qu'il utilise l'Outlook qui est déja ouvert et qu'il | affiche la fenetre Calendar dans l'Outloo déja ouvert . |
Effectivement, Automation ne sait pas utiliser une instance d'Outlook qu'il n'a pas ouverte lui-même.
Il va falloir se replonger dans la doc pour comprendre la différence entre les méthodes GetObject et CreateObject, outre le fait que :
createobject crée une instance à condition que outlook soit déjà ouvert tandis que getobject refusera de s'exécuter si outlook est fermé.
Essaye ceci pour afficher un message, peut-être que tu arriveras à détourner le code pour faire ce que tu souhaites.
Sub test() Dim OlApp As Outlook.Application Set OlApp = GetObject(, "Outlook.application") OlApp.CreateItem(olMailItem).display Set OlApp = Nothing End Sub -- à+ Arnaud -------------------------------------------------- Access Memorandum - http://memoaccess.free.fr ## Réponses souhaitées sur ce forum, merci. ## --------------------------------------------------
DanRod
Bon pour l'instant j'avance tout seul ...je croyais qu'il y avait des experts Outlook sur ce Forum ?
----> Bah non, on t'attendait justement.... Ici, il n'y a pas d' "EXPERTS", juste des bénévoles que s'entre-aident. Daniel
Bon pour l'instant j'avance tout seul ...je croyais qu'il y avait des
experts Outlook sur ce Forum ?
----> Bah non, on t'attendait justement....
Ici, il n'y a pas d' "EXPERTS", juste des bénévoles que s'entre-aident.
Daniel