> Tous les forums > Forum Bureautique
 Macro pour un envoi feuille excel par mail
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
jsonney
  Posté le 05/12/2012 @ 11:14 
Aller en bas de la page 
Nouvel astucien

Bonjour ami du forum!

J'ai besoin de votre aide car j'aimerai pourvoir envoyer une feuille excel à une pharmacie grâce à une maccro mais il faut que cette feuille excel soit en format pdf afin qu'elle ne puisse être modifiée.

Je ne m'y connais pas trop donc voilà pourquoi j'ai besoin de votre aide.

Actuellement, pour l'envoi de la feuille, j'ai ce code:

Sub EnvoiPage()
Dim Destinataires(1) As String, Sujet As String
Dim AccuseReception As Boolean
Destinataires(1) = "sonneyj@gmail.com"
Sujet = "Complément de commande"
AccuseReception = True
ThisWorkbook.Sheets("Commande").Copy
ActiveWorkbook.SendMail Destinataires, Sujet, AccuseReception
ActiveWorkbook.Close False
End Sub

De plus, comment fait-on pour avoir un bouton d'envoi automatique sur excel... Je sais, je ne suis pas doué niveau excel.

Je vous remercie d'avance de votre aide.

Publicité
qmike549
 Posté le 05/12/2012 à 15:04 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

bonjour

quel est ta version d' excel

A partir d'excel 2007 ; il est possible de créer directement sous Excel un format .PDF

Pour les versions antérieurs , il est possible d'installer un produit tiers qui crée le format .PDF (Par exemple : PDFCreator)

jsonney
 Posté le 05/12/2012 à 17:26 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Nouvel astucien

Bonjour,

ma version d'excel est la 2010. J'ai vu que je pouvais le passer en PDF mais je ne veux envoyer qu'une feuille de mon catalogue en format PDF à la pharmacie puisque la deuxième feuille se constitue de mes listes déroulantes. Dans l'idée, il faut que je puisse envoyer la feuille 1 au format PDF afin qu'elle arrive sur place sans pouvoir être modifiable.

Je peux volontiers donner le fichier en privé pour autant qu'il y ait un minimum de confidentialité.

qmike549
 Posté le 05/12/2012 à 19:45 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Maître astucien

bonjour

Quel est le loecteur .PDF installé sur le pc

Le principe est le suivant

Une fois le fichier .pdf crée via excel 2010

Le fichier .pdf d'affiche sous Acrobat reader ou foxit (Selon le choix du lecteur)

Sous Acrobat Reader , sélectionner le menu fichier >>>> Fichier Joindre à un message électronique >>> Compléter le message >>> Cliquer sur le bouton JOindre

La messagerie reconnue sur le pc comme messagerie par défaut s'ouvre , il ne reste qu'à saisir l'adresse email du ou des destinataires.

ferrand
 Posté le 06/12/2012 à 12:06 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour,

Je ne vais pas résoudre ton problème (par manque de temps pour créer des conditions de test et aussi parce que j'ai un problème préalable de messagerie par défaut à régler...), cependant l'examen des commandes d'Excel 2010 fait apparaître une commande : Envoyer comme pièce jointe au format PDF.

Je dirais donc a-priori que la macro que tu veux construire est possible. Peut-être pourrais-tu essayer de procéder manuellement à un tel envoi (à ta propre adresse, pour tester) en enregistrant une macro. Il est possible que cela te permette de détecter les mots-clés, instructions, méthodes à utiliser pour automatiser cette action.

Bonne continuation.

bruce68
 Posté le 06/12/2012 à 23:22 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonsoir jsonney et le forum

Fichier joint à tester

Attention faire modif dans la macro

http://cjoint.com/?BLgxut7XJtc

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
379,99 €Ecran PC 34 pouces incurvé Dell S3422DWG (UWQHD, VA, 144 Hz, 1 ms, FreeSync) à 379,99 €
Valable jusqu'au 25 Janvier

Boulanger sur Rakuten fait une promotion sur l'écran PC 34 pouces incurvé  Dell S3422DWG qui passe à 379,99 € au lieu de 469 € ailleurs. Cet écran possède une dalle VA UWQHD  (3440x1440) à 144 Hz et avec un temps de réponse de 1 ms. Il est compatible FreeSync (et GSync via Adaptive Sync). La hauteur, l'inclinaison et la rotation de l'écran sont réglables. 2 ports HDMI et 1 port DP. Il peut faire également office de hub USB 3 (4 ports).

19 € en points Rakuten vous sont également reversés pour vos prochains achats.


> Voir l'offre
229,90 €Smartphone Poco X3 Pro (6,67 pouces 120 Hz, Snapdragon 860, 8 Go/ 256 Go) à 229,90 €
Valable jusqu'au 25 Janvier

Xiaomi fait une belle promotion sur le smartphone Poco X3 Pro qui passe à 229,90 € au lieu de 299 € avec le code NEWXIAOMI. Il est équipé du processeur Qualcomm Snapdragon 860 (8 coeurs), de 8 Go de RAM, de 256 Go de stockage et d’un écran de 6,67 pouces ultra fluide 120 Hz.

Il comprend aussi une Quad-Caméra de 48 MP avec IA et une caméra selfie poinçonnée de 20 MP. Il comprend une grande batterie de 5160 mAh, pour une utilisation sur plusieurs jours (supporte la charge rapide de 33W). Le POCO X3 Pro dispose également d'un capteur d’empreinte digitale sur le côté et une prise jack 3,5 mm pour vous permettre de brancher vos haut-parleurs ou vos écouteurs filaires.

Avec GPS, NFC, Bluetooth 5, WiFi, USB C. Le tout tourne sous Android 10.

Notez qu'il a été élu meilleur smartphone à moins de 300 € par le magazine UFC Que Choisir.

La version 6 Go / 128 Go est également en promotion à 199,90 € au lieu de 249,90 € avec le code NEWXIAOMI.


> Voir l'offre
649,99 €Microsoft Surface Laptop Go 12.4 pouces tactile (Core i5, 8 Go, SSD 128 Go) à 649,99 €
Valable jusqu'au 25 Janvier

Fnac fait une promotion sur l'ordinateur portable Microsoft Surface Laptop Go 12.4 pouces tactile qui passe à 649,99 € alors qu'on le trouve ailleurs autour de 799 €. Cet ordinateur de très grande qualité dispose d'un écran tactile de 12.4 pouces 1536x1024 pixels, de 8 Go de RAM, d'un processeur Intel Core i5 1035G1, d'un SSD de 128 Go. Il ne pèse que 1,11 kg et offre une autonomie jusqu'à 13h.

Un PC très léger, compact et avec une super autonomie que vous pourrez emmener partout avec vous.


> Voir l'offre

Sujets relatifs
[excel 2007] macro pour aller sur autre feuille
Envoi direct feuille excel Mail-objet Formulaires
2 pages par feuille dans macro excel
Creation d' une boucle macro dans fichier EXCEL pour impression
Macro pour ouverture d'un fichier Excel
Macro pour créer un Gencode sur Excel - EAN 18
icône pour lancer une feuille excel
Bouton macro dans feuille Excel 2010
Macro excel pour enregistrer
macro excel pour convertir données
Plus de sujets relatifs à Macro pour un envoi feuille excel par mail
 > Tous les forums > Forum Bureautique