> 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
1049,99 €Portable 15,6' Lenovo Legion 5 (FHD, Ryzen 5, 16Go, SSD 512Go, RTX3060) à 1049,99 €
Valable jusqu'au 25 Janvier

Cdiscount fait une promotion sur le PC portable Lenovo Legion 5 (15ACH6H) dédié aux joueurs qui passe à 1049,99 € au lieu de 1200 €. Ce PC portable très bien équipé possède un écran 15,6 pouces LED Full HD 120 Hz, un processeur AMD Ryzen 5 5600H, 16 Go de RAM, un SSD de 512 Go et une carte graphique GeForce RTX 3060 6 Go dédiée qui avalera tous vos jeux sans broncher. L'ordinateur est livré sans OS mais vous pouvez facilement installer Windows 10/11.


> Voir l'offre
246,71 €Casque sans fil à réduction de bruit Sony WH-1000XM4 (Hi-Res Audio, Bluetooth/NFC) à 246,71 € livré
Valable jusqu'au 26 Janvier

Amazon Allemagne propose actuellement l'excellent casque sans fil à réduction de bruit et Hi-Res Audio Sony WH-1000XM4 à 241,01 € (avec la TVA ajustée). Comptez 5,70 € pour la livraison en France soit un total de 246,71 € livré. On le trouve ailleurs à partir de 349 €. Equipé de l'annulation de bruit active, d'une connexion sans fil Bluetooth et NFC, d'un confort supérieur et d'une autonomie longue durée (30 heures), ce modèle vous accompagnera idéalement dans tous vos déplacements. Profitez d'une qualité acoustique Hi-Res Audio, de commandes tactiles intuitives et des assistants vocaux intégrés. Laissez-vous transporter au coeur des émotions de vos morceaux préférés et révolutionnez votre manière d'écouter la musique.


> Voir l'offre
104,99 €Nouvelle liseuse Amazon Kindle Paperwhite 6.8 pouces avec éclairage réglable à 104,99 €
Valable jusqu'au 25 Janvier

Boulanger fait une promotion sur la toute dernière version de la liseuse Kindle Paperwhite d'Amazon qui passe à 104,99 € au lieu de 139,99 €. 

Cette version est désormais doté d'un écran 6,8 pouces (6 pouces auparavant), de bords plus fins, d'un éclairage réglable (vous pouvez changer la teinte de l'écran d'une lumière blanche à un ambre chaud ou programmer quand changer la lumière) avec 17 Leds et d'une autonomie pouvant aller jusqu'à 10 semaines, et 20 % plus rapide pour tourner les pages. Avec une façade plane et un écran sans reflets de 300 ppp qui se lit comme une véritable page imprimée, même en plein soleil.

Elle est toujours résistante à l'eau (IPX8), afin que vous puissiez lire en toute tranquillité à la plage, au bord de la piscine ou dans le bain. Cette liseuse dispose du WiFi, d'un port de charge USB C et de 8 Go d'espace de stockage.

Formats pris en charge : Kindle Format 8 (AZW3), Kindle (AZW), TXT, PDF, MOBI non protégé, PRC natif ; HTML, DOC, DOCX, JPEG, GIF, PNG, BMP converti. Vous pouvez également les fichiers Epub avec cette astuce.


> 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