Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Envoyer une feuille de calcul par mail

4 réponses
Avatar
Vincent
Bonjour
J'essaie de créer une proc qui envoie une feuille de calcul avec une adresse
e-mail.
Dans un 1er temps, je souhaite extraire une feuille d'un classeur, et
l'enregistrer sur le bureau, avec un nom spécifique.
Dans un 2ème temps, je souhaite qu'une copie de cette feuille, soit expédiée
avec une adresse spécifiée.
Est-ce possible ?
Merci beaucoup pour vos réponse.
Vincent

4 réponses

Avatar
Philippe.R
Bonjour Vincent :
Comme ceci ?

http://www.excelabo.net/xl/sortir.php#feuillemail

--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.

"Vincent" a écrit dans le message de news:
Bonjour
J'essaie de créer une proc qui envoie une feuille de calcul avec une adresse
e-mail.
Dans un 1er temps, je souhaite extraire une feuille d'un classeur, et
l'enregistrer sur le bureau, avec un nom spécifique.
Dans un 2ème temps, je souhaite qu'une copie de cette feuille, soit expédiée
avec une adresse spécifiée.
Est-ce possible ?
Merci beaucoup pour vos réponse.
Vincent




Avatar
Vincent
Ok merci Philippe, j'y vais de ce clic !
Bonne journée.
Vincent

"Philippe.R" a écrit dans le message de
news:e%
Bonjour Vincent :
Comme ceci ?

http://www.excelabo.net/xl/sortir.php#feuillemail

--
Amicales Salutations
XL 97 / 2000 / 2002
Retirer A_S_ pour répondre en privé.

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

Bonjour
J'essaie de créer une proc qui envoie une feuille de calcul avec une
adresse


e-mail.
Dans un 1er temps, je souhaite extraire une feuille d'un classeur, et
l'enregistrer sur le bureau, avec un nom spécifique.
Dans un 2ème temps, je souhaite qu'une copie de cette feuille, soit
expédiée


avec une adresse spécifiée.
Est-ce possible ?
Merci beaucoup pour vos réponse.
Vincent








Avatar
claudy
Sub envoyer()
zaza = MsgBox("Vous allez m'envoyer votre fichier ? ," & Chr(10) & _
"Voullez vous continuer?", vbOKCancel)
If zaza = 2 Then
Exit Sub
End If
ActiveWorkbook.SendMail ("")
End Sub

Vincent wrote:
Bonjour
J'essaie de créer une proc qui envoie une feuille de calcul avec une
adresse e-mail.
Dans un 1er temps, je souhaite extraire une feuille d'un classeur, et
l'enregistrer sur le bureau, avec un nom spécifique.
Dans un 2ème temps, je souhaite qu'une copie de cette feuille, soit
expédiée avec une adresse spécifiée.
Est-ce possible ?
Merci beaucoup pour vos réponse.
Vincent


Avatar
Vincent
Bonjour et merci beaucoup, Claudy
En fait je viens d'aller sur Excelabo grâce à l'excellent Philippe, et j'ai
trouvé.
Cela dit, ta proc est géniale.
Bonne journée.
Vincent

"claudy" a écrit dans le message
de news:41555c2d$0$4128$
Sub envoyer()
zaza = MsgBox("Vous allez m'envoyer votre fichier ? ," & Chr(10) & _
"Voullez vous continuer?", vbOKCancel)
If zaza = 2 Then
Exit Sub
End If
ActiveWorkbook.SendMail ("")
End Sub

Vincent wrote:
Bonjour
J'essaie de créer une proc qui envoie une feuille de calcul avec une
adresse e-mail.
Dans un 1er temps, je souhaite extraire une feuille d'un classeur, et
l'enregistrer sur le bureau, avec un nom spécifique.
Dans un 2ème temps, je souhaite qu'une copie de cette feuille, soit
expédiée avec une adresse spécifiée.
Est-ce possible ?
Merci beaucoup pour vos réponse.
Vincent