Bonjour,
J'ai trouvé sur ce site, le moyen d'ouvir un fichier excel à partir de Word :Je voudrais faire la même chose pour ouvrir un message (que je modifirai avant de l'envoyer).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub Image31_Click() Dim appXl As Excel.Application Dim Wb As Excel.Workbook Set appXl = CreateObject("Excel.Application") appXl.Visible = True Set Wb = appXl.Workbooks.Open("Y:\IMT\Exploitation\Station Centrales Telesurveillance\Service\Dossier Formation\9-MATMUT Protection Juridique\nom du fichier") '..... End Sub
J'ai essayémais OlApp.Open, ça ne fonctionne pas... j'ai le message "Propriété ou méthode non gérée par cet objet " ; je ne vois pas quel autre méthode employer
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Sub OuvrMail() Dim OlApp As New Outlook.Application Set OlApp = CreateObject("outlook.application") OlApp.Open _ "N:\Mon répertoire\Mon Message.oft" End Sub
Est-ce quelqu'un peut m'aider ? svp.
Merci
Partager