Bonjour
Dans votre userform, macro --> Private Sub UserForm_Initialize()
Changez cette variable :
strPath = Application.DefaultFilePath & Application.PathSeparator & "Dossier PDFs"
par
strPath = "C:\Users\jmc\Documents\jm\INFIRMIERE" & Application.PathSeparator
ou par ceci
strPath = Application.DefaultFilePath & Application.PathSeparator & "jm\INFIRMIERE" & Application.PathSeparator
Si votre fichier excel est dans le même répertoire que les PDF, on peut encore changer le "strpath"
Cordialement