Bonjour,
Quelqu'un peut-il me dire s'il est possible d'envoyer, en=20
tant que pi=E8ce jointe dans un message =E9lectronique,=20
seulement une partie d'un classeur Excel ?
Exemple, je veux transmettre =E0 mon correspondant les=20
feuilles 1 & 2 de mon classeur excel, les feuilles 3,4 &=20
5 ne le concernant pas.
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
CAP2
Salut,
ce qu'on peut faire c'est envoyer un classeur entier en pièce jointe, mais on peut contourner en commençant par masquer les feuilles qui n'intéressent pas le destinataire, puis envoyer le résultat, puis réafficher les feuilles pour toi. A moins que le destinataire ne connaisse VBA, il ne saura jamais qu'il y a des feuilles cachées et donc ne pourra pas les visualiser... Voici le code de la macro (pour masquer les feuilles 3 à 5, à toi d'adapter) :
Sub Test() Dim i As Byte
For i = 3 To 5 Worksheets(i).Visible = 2 Next
Application.Dialogs(xlDialogSendMail).Show
For i = 3 To 5 Worksheets(i).Visible = -1 Next
End Sub
Ca marche ?
CAP2
Salut,
ce qu'on peut faire c'est envoyer un classeur entier en pièce jointe, mais
on peut contourner en commençant par masquer les feuilles qui n'intéressent
pas le destinataire, puis envoyer le résultat, puis réafficher les feuilles
pour toi.
A moins que le destinataire ne connaisse VBA, il ne saura jamais qu'il y a
des feuilles cachées et donc ne pourra pas les visualiser...
Voici le code de la macro (pour masquer les feuilles 3 à 5, à toi d'adapter)
:
ce qu'on peut faire c'est envoyer un classeur entier en pièce jointe, mais on peut contourner en commençant par masquer les feuilles qui n'intéressent pas le destinataire, puis envoyer le résultat, puis réafficher les feuilles pour toi. A moins que le destinataire ne connaisse VBA, il ne saura jamais qu'il y a des feuilles cachées et donc ne pourra pas les visualiser... Voici le code de la macro (pour masquer les feuilles 3 à 5, à toi d'adapter) :
Sub Test() Dim i As Byte
For i = 3 To 5 Worksheets(i).Visible = 2 Next
Application.Dialogs(xlDialogSendMail).Show
For i = 3 To 5 Worksheets(i).Visible = -1 Next
End Sub
Ca marche ?
CAP2
Xav
Bonjour Frédéric
si tu n'as pas de liaisons avec les feuilles que tu ne désires pas envoyer, tu peux créer un nouveau classeur en ne recopiant que les onglets qui t'intéressent et envoyer ce nouveau classeur
@+ Xav "Frédéric" a écrit dans le message de news:2cf701c4a204$5a91ccd0$ Bonjour, Quelqu'un peut-il me dire s'il est possible d'envoyer, en tant que pièce jointe dans un message électronique, seulement une partie d'un classeur Excel ?
Exemple, je veux transmettre à mon correspondant les feuilles 1 & 2 de mon classeur excel, les feuilles 3,4 & 5 ne le concernant pas.
Quel astuce pourrait me permettre de faire cela ?
A bientôt.
Bonjour Frédéric
si tu n'as pas de liaisons avec les feuilles que tu ne désires pas envoyer,
tu peux créer un nouveau classeur en ne recopiant que les onglets qui
t'intéressent et envoyer ce nouveau classeur
@+
Xav
"Frédéric" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:2cf701c4a204$5a91ccd0$a601280a@phx.gbl...
Bonjour,
Quelqu'un peut-il me dire s'il est possible d'envoyer, en
tant que pièce jointe dans un message électronique,
seulement une partie d'un classeur Excel ?
Exemple, je veux transmettre à mon correspondant les
feuilles 1 & 2 de mon classeur excel, les feuilles 3,4 &
5 ne le concernant pas.
si tu n'as pas de liaisons avec les feuilles que tu ne désires pas envoyer, tu peux créer un nouveau classeur en ne recopiant que les onglets qui t'intéressent et envoyer ce nouveau classeur
@+ Xav "Frédéric" a écrit dans le message de news:2cf701c4a204$5a91ccd0$ Bonjour, Quelqu'un peut-il me dire s'il est possible d'envoyer, en tant que pièce jointe dans un message électronique, seulement une partie d'un classeur Excel ?
Exemple, je veux transmettre à mon correspondant les feuilles 1 & 2 de mon classeur excel, les feuilles 3,4 & 5 ne le concernant pas.
Quel astuce pourrait me permettre de faire cela ?
A bientôt.
Frédéric
Merci pour cette solution mais comment fait-on pour faire ré-apparaître les feuilles masquées ?
-----Message d'origine----- Salut,
ce qu'on peut faire c'est envoyer un classeur entier en pièce jointe, mais
on peut contourner en commençant par masquer les feuilles qui n'intéressent
pas le destinataire, puis envoyer le résultat, puis réafficher les feuilles
pour toi. A moins que le destinataire ne connaisse VBA, il ne saura jamais qu'il y a
des feuilles cachées et donc ne pourra pas les visualiser...
Voici le code de la macro (pour masquer les feuilles 3 à 5, à toi d'adapter)
:
Sub Test() Dim i As Byte
For i = 3 To 5 Worksheets(i).Visible = 2 Next
Application.Dialogs(xlDialogSendMail).Show
For i = 3 To 5 Worksheets(i).Visible = -1 Next
End Sub
Ca marche ?
CAP2
.
Merci pour cette solution mais comment fait-on pour faire
ré-apparaître les feuilles masquées ?
-----Message d'origine-----
Salut,
ce qu'on peut faire c'est envoyer un classeur entier en
pièce jointe, mais
on peut contourner en commençant par masquer les
feuilles qui n'intéressent
pas le destinataire, puis envoyer le résultat, puis
réafficher les feuilles
pour toi.
A moins que le destinataire ne connaisse VBA, il ne
saura jamais qu'il y a
des feuilles cachées et donc ne pourra pas les
visualiser...
Voici le code de la macro (pour masquer les feuilles 3 à
5, à toi d'adapter)
