Utilisation de Application.Dialogs(xlDialogSendMail).Show

Le
Yvan
Bonjour,

J'utilise un bouton pour envoyer un fichier à un destinataire. Ce bouton
fait appel à une macro utilisant la fonction
Application.Dialogs(xlDialogSendMail).Show

Est-il possible de saisir l'adresse du destinataire, l'objet et le texte du
message au sein même de la macro ???

--
Merci pour vos réponses.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
MichDenis
Le #4650841
Dim Adr As String
Adr = ""
Application.Dialogs(xlDialogSendMail).Show Adr




"Yvan"
Bonjour,

J'utilise un bouton pour envoyer un fichier à un destinataire. Ce bouton
fait appel à une macro utilisant la fonction
Application.Dialogs(xlDialogSendMail).Show

Est-il possible de saisir l'adresse du destinataire, l'objet et le texte du
message au sein même de la macro ???

--
Merci pour vos réponses.
jps
Le #4650811
et l'objet et le texte, denis?...tu travailles à mi-temps ou quoi?
jps

"MichDenis"
Dim Adr As String
Adr = ""
Application.Dialogs(xlDialogSendMail).Show Adr




"Yvan"
Bonjour,

J'utilise un bouton pour envoyer un fichier à un destinataire. Ce bouton
fait appel à une macro utilisant la fonction
Application.Dialogs(xlDialogSendMail).Show

Est-il possible de saisir l'adresse du destinataire, l'objet et le texte
du
message au sein même de la macro ???

--
Merci pour vos réponses.




MichDenis
Le #4650761
Les 3 arguments possibles à la fonction sont :
recipients, subject, return_receipt

Il est possible de faire ceci :

Dim Adr As String ' Adresse
Dim T As String ' L'objet du message

Adr = ""
T = "Un gros test"
Application.Dialogs(xlDialogSendMail).Show Adr, T

Il peut toujours essayé ceci ... mais ce n'est pas garanti...

Dim Adr As String ' Adresse
Dim T As String ' L'objet du message
Dim Texte As String ' le texte du message

Adr = ""
T = "Je suis en vacance"
Texte = "Entre 2 verres tu pourrais faire quelque chose" 'Charlebois

SendKeys Texte
Application.Dialogs(xlDialogSendMail).Show Adr, T

;-))



"jps" a écrit dans le message de news: eC0D%
et l'objet et le texte, denis?...tu travailles à mi-temps ou quoi?
jps

"MichDenis"
Dim Adr As String
Adr = ""
Application.Dialogs(xlDialogSendMail).Show Adr




"Yvan"
Bonjour,

J'utilise un bouton pour envoyer un fichier à un destinataire. Ce bouton
fait appel à une macro utilisant la fonction
Application.Dialogs(xlDialogSendMail).Show

Est-il possible de saisir l'adresse du destinataire, l'objet et le texte
du
message au sein même de la macro ???

--
Merci pour vos réponses.




Publicité
Poster une réponse
Anonyme