Voici mon probl=E8me: Envoyer une feuille de calcul (et non=20
le classeur entier!) par mail =E0 partir d'une macro.
Si l'op=E9ration est possible manuellement (Envoyer vers=20
Destinataires), je n'arrive pas =E0 l'automatiser dans la=20
mesure o=F9 la macro n'enregistre rien.
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
Warrio
Assures toi d'abbord que tu peux enregistrer des macros. ensuite il faut que tu copie la feuille que tu veux envoyer dans un nouveau fichier, ensuite envoyer ce nouveau fichier
Sub Macro1() Sheets("Sheet2").Select Sheets("Sheet2").Copy Application.Dialogs(xlDialogSendMail).Show Windows("Book1").Activate Application.Dialogs(xlDialogSendMail).Show End Sub
"boris" a écrit dans le message de news:0af801c398a2$e2dc7b10$ Bonjour,
Voici mon problème: Envoyer une feuille de calcul (et non le classeur entier!) par mail à partir d'une macro.
Si l'opération est possible manuellement (Envoyer vers Destinataires), je n'arrive pas à l'automatiser dans la mesure où la macro n'enregistre rien.
Pouvez vous m'aider ? Merci d'avance.
Assures toi d'abbord que tu peux enregistrer des macros.
ensuite il faut que tu copie la feuille que tu veux envoyer dans un nouveau
fichier, ensuite envoyer ce nouveau fichier
Sub Macro1()
Sheets("Sheet2").Select
Sheets("Sheet2").Copy
Application.Dialogs(xlDialogSendMail).Show
Windows("Book1").Activate
Application.Dialogs(xlDialogSendMail).Show
End Sub
"boris" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:0af801c398a2$e2dc7b10$a601280a@phx.gbl...
Bonjour,
Voici mon problème: Envoyer une feuille de calcul (et non
le classeur entier!) par mail à partir d'une macro.
Si l'opération est possible manuellement (Envoyer vers
Destinataires), je n'arrive pas à l'automatiser dans la
mesure où la macro n'enregistre rien.
Assures toi d'abbord que tu peux enregistrer des macros. ensuite il faut que tu copie la feuille que tu veux envoyer dans un nouveau fichier, ensuite envoyer ce nouveau fichier
Sub Macro1() Sheets("Sheet2").Select Sheets("Sheet2").Copy Application.Dialogs(xlDialogSendMail).Show Windows("Book1").Activate Application.Dialogs(xlDialogSendMail).Show End Sub
"boris" a écrit dans le message de news:0af801c398a2$e2dc7b10$ Bonjour,
Voici mon problème: Envoyer une feuille de calcul (et non le classeur entier!) par mail à partir d'une macro.
Si l'opération est possible manuellement (Envoyer vers Destinataires), je n'arrive pas à l'automatiser dans la mesure où la macro n'enregistre rien.
