Discussion :

[cjbzebulon]

----------------------------------------

Excel 2003 SP3, Visual Basic 6.3

Pour choisir un répertoire j'essaie BrowseForFolder, code ci-dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Set objShell = CreateObject("Shell.Application")
    Set objFolder = objShell.BrowseForFolder(&H0&, "Choisir un répertoire", _
        BIF_returnonlyfsdirs + BIF_dontgobelowdomain, _
        "Y:\EDS_formulaires\Cats absences congés\Formulaires congé 2006")
        On Error Resume Next
    Set oFolderItem = objFolder.Items.Item
    Chemin = oFolderItem.Path

Je connaissais déjà GetOpenFilename utile pour chercher un fichier mais qui ne fonctionne pour un répertoire que s'il contient au moins un fichier.
Par contre la fenêtre ouvere par GetOpenFilename permet de remonter dans l'arborescence en partant de la racine choisie.

Si le 4eme parametre (Racine) est absent ou vide on part de trop haut, si on le remplit on ne peut plus remonter au dessus de la racine.

Y a t'il un moyen de remonter au dessus de la racine ?


Quelle est la siginfication des différents parametres existants :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Const BIF_returnonlyfsdirs = &H1
Const BIF_dontgobelowdomain = &H2
Const BIF_statustext = &H4
Const BIF_returnfsancestors = &H8
Const BIF_editbox = &H10
Const BIF_validate = &H20
Const BIF_browseforcomputer = &H1000
Const BIF_browseforprinter = &H2000
Const BIF_browseincludefiles = &H4000
Const cdlOFNExplorer = &H80000
Const BIF_NEWDIALOGSTYLE = &H64

Certains se combinent en parametre 3, je ne comprends pas l'usage des 2 derniers.

Merci pour votre aide.

[fred65200]

bonjour,

pour les constantes :

BIF_BROWSEFORCOMPUTER --> Ne renvoie que les ordinateurs.

BIF_BROWSEFORPRINTER --> Ne renvoie que les imprimantes.

BIF_DONTGOBELOWDOMAIN --> Ne comprend pas les dossiers réseau.

BIF_RETURNFSANCESTORS --> Ne renvoie que les fichiers système ancêtres.

BIF_RETURNONLYFSDIRS --> Ne renvoie que les répertoires de fichiers système.

BIF_STATUSTEXT --> Comprend une zone d'état dans la boîte de dialogue. La fonction callback peut définir le statut du texte par l'envoi de messages de la boîte de dialogue.

c'est à peu près ça.
Cordialement