Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Utilisation de Application.Dialogs(xlDialogSendMail).Show

Utilisation de Application.Dialogs(xlDialogSendMail).Show

3 réponses
Avatar
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.
Signaler un problème avec ce contenu

3 réponses

Supprimer
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
Avatar
MichDenis
Dim Adr As String
Adr = ""
Application.Dialogs(xlDialogSendMail).Show Adr




"Yvan" a écrit dans le message de news:

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.
Avatar
jps
et l'objet et le texte, denis?...tu travailles à mi-temps ou quoi?
jps

"MichDenis" a écrit dans le message de news:

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




"Yvan" a écrit dans le message de news:

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.




Avatar
MichDenis
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" a écrit dans le message de news:

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




"Yvan" a écrit dans le message de news:

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.