OVH Cloud OVH Cloud

Lancer Outlook Express avec une adresse

6 réponses
Avatar
Florian
Bonjour,
je reformule ma question
Je désire avoir une procédure qui lance Outlook Express avec l'adresse
suivante :
toto@toto.fr
Comment faire ?
Merci beaucoup
Flo riant

6 réponses

Avatar
gilbert
bonjour

essaie ceci

Sub envoi()
Application.DisplayAlerts = False
Sheets("Client 1").Select
ActiveWorkbook.SendMail " ", Subject:="Votre document
xls", ReturnReceipt:=True
Application.DisplayAlerts = True
End Sub

@+++++
Gilbert

"Florian" a écrit dans le message de
news:%23iOnCA$
Bonjour,
je reformule ma question
Je désire avoir une procédure qui lance Outlook Express avec l'adresse
suivante :

Comment faire ?
Merci beaucoup
Flo riant




Avatar
Florian
Bonjour et merci, en fait, je souhaite ouvrir Outlook express avec l'adresse

Merci
Flo riant



"gilbert" a écrit dans le message de
news:OLp6vD$
bonjour

essaie ceci

Sub envoi()
Application.DisplayAlerts = False
Sheets("Client 1").Select
ActiveWorkbook.SendMail " ", Subject:="Votre document
xls", ReturnReceipt:=True
Application.DisplayAlerts = True
End Sub

@+++++
Gilbert

"Florian" a écrit dans le message de
news:%23iOnCA$
Bonjour,
je reformule ma question
Je désire avoir une procédure qui lance Outlook Express avec l'adresse
suivante :

Comment faire ?
Merci beaucoup
Flo riant








Avatar
Jacky
Bonjour Flo rian
Ce matin sur le forum convient peut-être,
dans une cellule
'---------------
=LIEN_HYPERTEXTE("mailto:";"toto")
'-----------------
+Clique sur la cellule bien sur.
Salutations
JJ

"Florian" a écrit dans le message de
news:%23iOnCA$
Bonjour,
je reformule ma question
Je désire avoir une procédure qui lance Outlook Express avec l'adresse
suivante :

Comment faire ?
Merci beaucoup
Flo riant




Avatar
isabelle
bonjour Florian,

si c'est Outlook express qui est définie par défaut sur ton poste,

ActiveWorkbook.FollowHyperlink _
Address:="mailto:", NewWindow:=True

isabelle


Bonjour et merci, en fait, je souhaite ouvrir Outlook express avec l'adresse

Merci
Flo riant

"gilbert" a écrit dans le message de
news:OLp6vD$
bonjour

essaie ceci

Sub envoi()
Application.DisplayAlerts = False
Sheets("Client 1").Select
ActiveWorkbook.SendMail " ", Subject:="Votre document
xls", ReturnReceipt:=True
Application.DisplayAlerts = True
End Sub

@+++++
Gilbert

"Florian" a écrit dans le message de
news:%23iOnCA$
Bonjour,
je reformule ma question
Je désire avoir une procédure qui lance Outlook Express avec l'adresse
suivante :

Comment faire ?
Merci beaucoup
Flo riant










Avatar
ChrisV
Bonjour Florian,

Sub zaza()
Shell "C:Program FilesOutlook Expressmsimn.exe " & _
"/mailurl:mailto:"
End Sub


ChrisV


"Florian" a écrit dans le message de
news:%23iOnCA$
Bonjour,
je reformule ma question
Je désire avoir une procédure qui lance Outlook Express avec l'adresse
suivante :

Comment faire ?
Merci beaucoup
Flo riant




Avatar
Florian
Merci beaucoup à tous
Cela fonctionne très bien
Bonne journée.
Flo riant

"ChrisV" a écrit dans le message de
news:uBtbZ$$
Bonjour Florian,

Sub zaza()
Shell "C:Program FilesOutlook Expressmsimn.exe " & _
"/mailurl:mailto:"
End Sub


ChrisV


"Florian" a écrit dans le message de
news:%23iOnCA$
Bonjour,
je reformule ma question
Je désire avoir une procédure qui lance Outlook Express avec l'adresse
suivante :

Comment faire ?
Merci beaucoup
Flo riant