Bonjour,
Je souhaite éditer un rapport PDF depuis un fichier Excel. Pour cela, j'ai créé la macro suivante que j'ai affectée à un bouton :
Sub Edition_Rapport()
Sheets("Diag - Modèle relationnel").Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Windows\Temp\" & "Diagnostic_Rapport" & ".pdf", Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=True
Sheets("Diag - RH").Select
Range("A1").Select
End Sub
Le problème c'est que lorsque le document PDF est édité, le zoom est beaucoup trop élevé, je suis obligé de le régler manuellement dans le doc publié.
Sauriez-vous quelle instruction ajouter pour faire en sorte que le PDF soit édité avec un zoom à 25% (au lieu de 125% actuellement) ? Vous trouverez en pièce jointe le fichier concerné
Merci beaucoup d'avance pour votre aide,