Grossissement d'un fichier apres envoi par messagerie
Bonjour à tous et toutes
juste une question
j'utilise un bouton avec d'envoyer automatiquement des fiches qui doivent être adressées journalièrement
tout ce passe à merveille sauf qu' à la réception la taille de la pièce joint est de 244 % ce qui n'est pas très jolie
y'a t il un moyen de modifier cela ?
Ci dessous mon code
Sub Mail_workbook_Outlook_1()
'Working in Excel 2000-2013
'This example send the last saved version of the Activeworkbook
'For Tips see:
Dim OutApp As Object
Dim OutMail As Object
Dim Adr, Nom As String
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
Adr = ActiveWorkbook.Path ' le chemin où est mon fichier
Nom = ActiveWorkbook.Name ' à adapter pour le nom désiré
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Adr & "\" & Nom & ".pdf"
With OutMail
.To = "charlotte.com"
.CC = "xx.com"
On Error Resume Next
.BCC = ""
.Subject = "fiche produit"
.Body = "Bonjour Veuillez trouver ci joint une fiche produit "
.Attachments.Add Adr & "\" & Nom & ".pdf" '''activeWorkbook.FullName
'''You can add other files also like this
'''.Attachments.Add ("C:\test.txt")
''''''ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=adr & "\" & nom & ".pdf"
.Send 'or use .Display
End With
On Error GoTo 0
Set OutMail = Nothing
Set OutApp = Nothing
MsgBox "message envoyé avec succés"
End Sub
bises à tous et toutes et super merci a tous les modérateurs de ce site génial
Bonjour,
Je ne crois pas que c'est au moment de la création du .pdf que se situe la chose.
Je ne sais pas avec quel utilitaire les gens ouvrent le fichier.pdf.
Sur ma machine, dans mon utilitaire de lecture de .pdf, je peux mettre l'option "Zoom par défaut" à 100%.
Dès lors, tout nouveau fichier.pdf que j'ouvre pour la première fois (huumm, nouveau et 1re fois, beau pléonasme
Fais des tests ...
J'espère que d'autres formeurs s'intéresseront à ce phénomène pour confirmer ou infirmer mon propos ... (en mentionnant quel est l'utilitaire utilisé pour lire les .pdf)
Pour ma part, j'utilise PDF-XChange Editor (version enregistrée), car il permet d'annoter les .pdf.
ric
Rebonjour,
Je viens de tester avec Adobe Acrobat Reader.
Menu "Édition", "Préférences"
En haut à gauche, sélectionner "Affichage", à droite en haut, "Zoom".
Le pourcentage choisi dans cette option sera celui pour tout fichier.pdf ouvert.
ric
merci pour cette réponse j'étais parti sur une mauvaise piste