Convertir un fichier en PDF en Excel avec différents numéro

[sebgdb]

Bonjour à tous,

J'ai un fichier excel que je dois convertir en PDF. La manipulation est simple à faire.

Mon problème est de faire la manipulation 150 fois avec un numéro différent Exemple : 00179856

Avez-vous un macro a me proposer?

Je vous joins le fichier excel

Cdt

Seb

 

[PMO2]

Re : Convertir un fichier en PDF en Excel avec différents numéro

Bonjour,

Essayez le code suivant à copier dans un module Standard

Sub aa()
Dim Numero&
'---
For Numero& = 179856 To 179856 + 9 'à adapter (+ le nombre de fois (ici 10 fois))
  ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
      Filename:=ThisWorkbook.Path & "\" & ThisWorkbook.Name & "_" & Numero& & ".pdf", _
      Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
      OpenAfterPublish:=False
Next Numero&
End Sub

 

[cathodique]

Re : Convertir un fichier en PDF en Excel avec différents numéro

Salut,

Je ne sais pas si ça te conviendra. Je ne vois pas vraiment l'utilité de créer 150 fichiers identiques en pdf.

Alors le code fonctionne pour excel 2007, et il faut telecharger un Complément de Microsoft Office 2007 à installer sur ton pc.

Ton fichier en retour, attention la procédure est longue vu le nombre de fichiers à créer en pdf.

On m'a aidé, je t'aide à mon tour avec le peu que j'ai appris.

 

[sebgdb]

Re : Convertir un fichier en PDF en Excel avec différents numéro

Salut,

Merci pour ta réponse et ça avance

Mon problème c'est d'affecter mes articles. donnez a chaque pdf le numéro d'article

Exemple :

pour un article jai le numéro 00156037 =le planning en pdf

Merci de ton aide

A+

 

[cathodique]

Re : Convertir un fichier en PDF en Excel avec différents numéro

Regarde si ça te va ainsi avec le bouton.