Répertoire

[sten83]

Bonjour a tous.
J'ai une macro qui execute l'ouverture d'un répértoire spécifique.
Mes fichiers sont fait avec excel mais les sauvegardes se font en format PDF, jusque là pas de soucis, par contre lorsque j'ouvre le répertoire qui contient mes sauvegardes, via le menu de mon classeur, si je clic sur une sauvegarde voici le resultat?
Voir fichier joint
En plus je dois selectionner tous les fichiers car ceux en PDF ne s'affiche pas dans le dossier.
Avez-vous une solution?
Merci
Regarde la pièce jointe Doc1.docx

 

[don_pets]

Re : Répertoire

yep,

bah ta copie montre un import, alors la question est que cherches tu à faire: ouvrir un doc externe (quelqu'il soit pdf, excel, etc...) ou bien cherches tu à importer les données sur un nouvel onglet de ton fichier ?

 

[sten83]

Re : Répertoire

C'est peut être le code de ma macro qui n'est pas bon?

Sub ChercherDossier()
Dim Rep As String
Rep = "c:\LES SERVICES\CONTRATS"
If Dir(Rep, vbDirectory) <> "" Then
Application.Dialogs(xlDialogOpen).Show Rep
Else
MsgBox "Chemin introuvable"
End If

End Sub