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.

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)

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é.

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.

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.

Bonsoir jsonney et le forum

Fichier joint à tester

Attention faire modif dans la macro

http://cjoint.com/?BLgxut7XJtc