deux petit problèmes macro

[Win]

Bonjour,
J'ai deux petits problèmes que je n'arrive pas à résoudre :
-Tout d'abord,j'aimerai faire afficher avec une macro excel, le browser windows pour pouvoir naviguer dans les dossiers et en sélectionner un. Le but étant de récupérer le chemin pour atteindre le dossier. J'ai trouvé l'instruction "getfile" pour un fichier mais ça ne marche pas pour un dossier...Je sais que le macro "listage fichiers.xla" dispo dans les downloads fait ça, mais le code est protégé.
-La deuxième chose, mais je ne sais pas si c'est possible : j'aimerais pouvoir récupérer avec Excel les n premiers caractères d'un fichier word pour les mettre sur une feuille.

Merci d'avance.

 

[Lord Nelson]

Salut Win,

Pour répondre à la première partie de ta question :

<http://www.excel-downloads.com/html/French/forum/read.php?f=1&i=7197&t=7146>

Ti y donne un exemple d'utilisation de la fonction API SHBrowseForFolder. C'est un peu technique !

A+
Horatio

 

[Win]

Merci beaucoup,
j'ai testé et ça marche nickel... même si j'ai rien compris!

 

[myDearFriend]

Bonsoir Win, Lord Nelson.

Win, si tu possèdes Excel 2002 (ou ultérieur), tu peux utiliser l'objet FileDialog pour parcourir et récupérer ainsi le chemin d'un dossier :

With Application.FileDialog(msoFileDialogFolderPicker)
.ButtonName = "Choix Dossier"
.InitialFileName = ThisWorkbook.Path & "\"
.Title = "Choisissez le dossier et cliquez sur le bouton ""Choix Dossier"""
.Show
If .SelectedItems.Count > 0 Then
MsgBox "Vous avez sélectionné :" & vbCrLf & .SelectedItems(1)
End If
End With


Tu choisis le dossier dans la boite de dialogue et tu cliques sur le bouton "Choix Dossier"


Cordialement,
Didier_mDF

 

[Lord Nelson]

Merci Didier,

C'est effectivement une bonne solution, beaucoup moins compliquée que l'API, j'en prends bonne note.

A+
Horatio

 

[Win]

Merci beaucoup pour cette solution qui en plusa l'air d'être compatible sur Mac et PC (il fallait que ça marche pour les deux et je ne l'avais pas précisé)
Encore merci à vous.
Win

 

[Jean-Marie]

Bonsoir Win

Désolé de te contredire, mais cela ne fonctionne pas sur ma machine, la propriété FileDialog de l'objet application n'existe pas sous mac. Il faudra trouver autre chose.

On va rechercher avec didier_mdf une solution

@+Jean-Marie

 

[Win]

Oups, j'ai écris trop vite,je me suis dis que comme ça ne faisait pas appel à shell32.dll comme pour la première solution, ça devait marcher...
En attendant, je vais devoir utiliser la fonction getopenfilename en sélectionnant un fichier et en extraire le chemin du dossier faute de mieux.
Merci beaucoup de vous décarcasser pour mes petits problèmes!

 

[Jean-Marie]

Re...

Si cela te dit, nous pouvons en discuter sur le t'chat

@+Jean-Marie

 

[Win]

merci, pourquoi pas. le seul hic, c'est que je suis en vacances et que je n'ai pas internet haut débit. Je pars aux Etats-Unis dans 5 jours et je devrais avoir une conexion potable là bas à partir du 15/20 Aout (j'y reste jusqu'à fin décembre)