> 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
449,99 €Ultraportable MSI Modern 14 (Core i3, 8 Go RAM, SSD 256 Go) à 449,99 €
Valable jusqu'au 30 Janvier

RueDuCommerce fait une promotion sur l'ultraportable MSI Modern 14 B10MW-634XFR qui passe à 449,99 € au lieu de 549,99 €. Cet ordinateur possède une dalle 14 pouces Full HD, est équipé d'un processeur Intel Core i3-10110U, de 8 Go de RAM et d'un SSD NVME de 256 Go. Il ne pèse que 1,18 kg et offre une autonomie d'une dizaine d'heures. 

 L'ordinateur est livré sans OS mais vous pouvez facilement installer Windows 10.


> Voir l'offre
199,99 €Ecran 28 pouces HP V28 (4K, TN, 1 ms, 60 Hz, FreeSync) à 199,99 €
Valable jusqu'au 26 Janvier

Cdiscount fait une belle promotion sur l'écran HP V28 qui passe à 199,99 €. L'écran HP V28 dispose d'une dalle TN 4K (3840x2160) de 28 pouces et d'une connectique DP et 2xHDMI. On le trouve ailleurs à partir de 235 €. Une bonne affaire pour un écran adapté à Internet, à la bureautique et au multimédia.


> Voir l'offre
899 €PC portable 15.6 pouces Lenovo (FHD 120 Hz, Ryzen 5, 8 Go de RAM, SSD 512 Go, RTX 3060) à 899 €
Valable jusqu'au 26 Janvier

Lenovo fait une promotion sur l'ordinateur portable Lenovo IdeaPad Gaming 3 qui passe à 899 € alors qu'on le trouve ailleurs autour de 1099 €. Ce portable dispose d'un écran de 15.6 pouces FullHD (1920x1080) IPS 120 Hz, d'un processeur AMD Ryzen 5 5600H, de 8 Go de RAM, d'un SSD de 512 Go, d'une carte graphique dédiée NVIDIA GeForce RTX 3060 6 Go, du WiFi et du Bluetooth. Le tout tourne sous Windows 10 que vous pourrez mettre à jour pour Windows 11.


> 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