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
Didier Clément
Bonsoir.
Un truc comme ça cela peut peut-être t'aider ?.
Private Declare Function ShellExecute _ Lib "shell32.dll" _ Alias "ShellExecuteA" _ (ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, _ ByVal lpParameters As String, _ ByVal lpDirectory As String, _ ByVal nShowCmd As Long) As Long
Sub CommandButton1_Click() ShellExecute 0, "Open", "mailto:", "", "C:", 1 End Sub
Didier.
"Michel Voirain" a écrit dans le message de news: Od%
Bonjour à tous, Je cherche à lancer outlook à partit d'Excel pour lui faire faire un envoyer recevoir. Est-ce possible? Merci à tous, Michel
Bonsoir.
Un truc comme ça cela peut peut-être t'aider ?.
Private Declare Function ShellExecute _
Lib "shell32.dll" _
Alias "ShellExecuteA" _
(ByVal hwnd As Long, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
Sub CommandButton1_Click()
ShellExecute 0, "Open", "mailto:", "", "C:", 1
End Sub
Didier.
"Michel Voirain" <michel.voirain@wanadoo.fr> a écrit dans le message de
news: Od%23ytSF7GHA.2384@TK2MSFTNGP04.phx.gbl...
Bonjour à tous,
Je cherche à lancer outlook à partit d'Excel pour lui faire faire un
envoyer recevoir. Est-ce possible?
Merci à tous,
Michel
Private Declare Function ShellExecute _ Lib "shell32.dll" _ Alias "ShellExecuteA" _ (ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, _ ByVal lpParameters As String, _ ByVal lpDirectory As String, _ ByVal nShowCmd As Long) As Long
Sub CommandButton1_Click() ShellExecute 0, "Open", "mailto:", "", "C:", 1 End Sub
Didier.
"Michel Voirain" a écrit dans le message de news: Od%
Bonjour à tous, Je cherche à lancer outlook à partit d'Excel pour lui faire faire un envoyer recevoir. Est-ce possible? Merci à tous, Michel
