Bonjour à tous,
J'ai un problème avec une macro qui génère des pdf.
En effet, elle fonctionne sur tous les PC de mes collègues mais ne marche pas sur le mien... et je dois en etre l'unique utilisateur...
Les références cochées sont les mêmes et tous les paramètres excel et macro semblent identiques
Bien évidement, le chemin pour enregistrer est correct et marche sur les autres PC...
Voici le code en question:
Le message d'erreur qui apparait "document non enregistré" avec le code erreur:'-2147467261 (80004003)'
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 With Sheets("Paramètres") For ligne = 2 To WorksheetFunction.CountA(.Columns("A")) zone = .Range("A" & ligne) marque = .Range("B" & ligne) plage_debut = .Range("C" & ligne) plage_fin = .Range("D" & ligne) feuille = "Reporting_" & marque & "_chiffres" Worksheets(feuille).Range(plage_debut & ":" & plage_fin).ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "T:\Reporting\Envoi PDF quotidien\Rapport." & zone & "_du_jour.pdf", Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
Merci de votre aide
Alex
Partager