Bonjour, dans le cadre de mon travail, il faut qu'a l'aide d'un macro j’arrive à ouvrir tous les fichiers PDF d'un dossier. J'ai trouver un macro capable de réaliser cette tache mais je n'arrive pas a le remplir correctement.
Le macro est :
Sub InsertionVE()
ChDir "C:\Users\BE1.CMAS\Documents\1\Plan machine\RE"
monfichier = Dir("*.*")
While monfichier <> ""
Workbooks.Open monfichier
monfichier = Dir()
Wend
End Sub
Je dois ouvrir les PDF du dossier RE si quelqu'un peut m'aider.
Cordialement Arnaud