OVH Cloud OVH Cloud

liste répertoire

8 réponses
Avatar
Fred
bonjour

je cherche à récupérer les sous répertoires d'un répertoire
dans une liste de choix.
j'ai trouvé sur disciplus des exemples de récupération de
fichiers mais je ne sais pas comment l'adapter pour des répertoires.
merci pour votre aide

Fred

8 réponses

Avatar
Dédé
Salut Fred !

Peut-être là :

--
Pour me répondre, copiez cette formule dans excel ;-) et sur une seule ligne
!
ÊR(83)&CAR(117)&CAR(103)&CAR(117)&CAR(115)&CAR(49)&CAR(50)&CAR(48)&CAR(48)
&CAR(50)&CAR(64)&CAR(121)&CAR(97)&CAR(104)&CAR(111)&CAR(111)&CAR(46)&CAR(102
)&CAR(114)

Sites de références,
Word :
http://faq.ms.word.free.fr/
Barre de menu disparues ? voir ici -
http://faq.ms.word.free.fr/Environnement/Environnement_reponses.htm#e1
Incrémentation chronologique ?
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v3
Chiffres en lettres ? (Word et Excel)
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v4
Excel :
http://www.excelabo.net/
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_xl
http://dj.joss.free.fr/faq.htm
http://perso.wanadoo.fr/frederic.sigonneau/
http://excel.1.free.fr/

"Fred" <nospam> a écrit dans le message de
news:
bonjour

je cherche à récupérer les sous répertoires d'un répertoire
dans une liste de choix.
j'ai trouvé sur disciplus des exemples de récupération de
fichiers mais je ne sais pas comment l'adapter pour des répertoires.
merci pour votre aide

Fred




Avatar
Dédé
mince ... parti sans demander son reste ...

Alors voici le lien concerné :
http://www.excelabo.net/xl/repertoires.php#filesearch

Autrement, ben ici :
http://www.excelabo.net/xl/repertoires.php

Est-ce que tu trouve ton bonheur ?
Salutations
Dédé

--
Pour me répondre, copiez cette formule dans excel ;-) et sur une seule ligne
!
ÊR(83)&CAR(117)&CAR(103)&CAR(117)&CAR(115)&CAR(49)&CAR(50)&CAR(48)&CAR(48)
&CAR(50)&CAR(64)&CAR(121)&CAR(97)&CAR(104)&CAR(111)&CAR(111)&CAR(46)&CAR(102
)&CAR(114)

Sites de références,
Word :
http://faq.ms.word.free.fr/
Barre de menu disparues ? voir ici -
http://faq.ms.word.free.fr/Environnement/Environnement_reponses.htm#e1
Incrémentation chronologique ?
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v3
Chiffres en lettres ? (Word et Excel)
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v4
Excel :
http://www.excelabo.net/
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_xl
http://dj.joss.free.fr/faq.htm
http://perso.wanadoo.fr/frederic.sigonneau/
http://excel.1.free.fr/

"Fred" <nospam> a écrit dans le message de
news:
bonjour

je cherche à récupérer les sous répertoires d'un répertoire
dans une liste de choix.
j'ai trouvé sur disciplus des exemples de récupération de
fichiers mais je ne sais pas comment l'adapter pour des répertoires.
merci pour votre aide

Fred




Avatar
Philippe.R
Bonsoir Dédé,

ÊR(112)&CAR(97)&CAR(115)&CAR(32)&CAR(109)&CAR(97)&CAR(108)&CAR(32)&CAR(116)&CAR(111)&CAR(110)&CAR(32)&
CAR(97)&CAR(100)&CAR(114)&CAR(101)&CAR(115)&CAR(115)&CAR(101)&CAR(32)&CAR(33)&CAR(32)&CAR(59)&CAR(111)&C
AR(41)&CAR(41)

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002

"Dédé" a écrit dans le message de
news:%
Salut Fred !

Peut-être là :

--
Pour me répondre, copiez cette formule dans excel ;-) et sur une seule ligne
!
ÊR(83)&CAR(117)&CAR(103)&CAR(117)&CAR(115)&CAR(49)&CAR(50)&CAR(48)&CAR(48)
&CAR(50)&CAR(64)&CAR(121)&CAR(97)&CAR(104)&CAR(111)&CAR(111)&CAR(46)&CAR(102
)&CAR(114)

Sites de références,
Word :
http://faq.ms.word.free.fr/
Barre de menu disparues ? voir ici -
http://faq.ms.word.free.fr/Environnement/Environnement_reponses.htm#e1
Incrémentation chronologique ?
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v3
Chiffres en lettres ? (Word et Excel)
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v4
Excel :
http://www.excelabo.net/
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_xl
http://dj.joss.free.fr/faq.htm
http://perso.wanadoo.fr/frederic.sigonneau/
http://excel.1.free.fr/

"Fred" <nospam> a écrit dans le message de
news:
bonjour

je cherche à récupérer les sous répertoires d'un répertoire
dans une liste de choix.
j'ai trouvé sur disciplus des exemples de récupération de
fichiers mais je ne sais pas comment l'adapter pour des répertoires.
merci pour votre aide

Fred








Avatar
Papyty
Salut Dédé

Pour ta signature ;-)))

Sub Message()
For Var = 1 To 5
Lt = Round(-5.7083 * Var ^ 4 + 68.917 * Var ^ 3 _
- 287.29 * Var ^ 2 + 481.08 * Var - 159, 0)
Tx = Tx + Chr(Lt)
Next Var
MsgBox Tx, , "Papyty"
End Sub
Avatar
sabatier
quand papyty rejoint garnote...chapeau!
jps

Papyty a écrit:
Salut Dédé

Pour ta signature ;-)))

Sub Message()
For Var = 1 To 5
Lt = Round(-5.7083 * Var ^ 4 + 68.917 * Var ^ 3 _
- 287.29 * Var ^ 2 + 481.08 * Var - 159, 0)
Tx = Tx + Chr(Lt)
Next Var
MsgBox Tx, , "Papyty"
End Sub


Avatar
Papyty
Salut @ Tous, sabatier a écrit:
quand papyty rejoint garnote...chapeau!
jps

Papyty a écrit:
Salut Dédé

Pour ta signature ;-)))

Sub Message()
For Var = 1 To 5
Lt = Round(-5.7083 * Var ^ 4 + 68.917 * Var ^ 3 _
- 287.29 * Var ^ 2 + 481.08 * Var - 159, 0)
Tx = Tx + Chr(Lt)
Next Var
MsgBox Tx, , "Papyty"
End Sub



Sub Message()
For Var = 1 To 6
Lt = -1.5667 * Var ^ 5 + 26.25 * Var ^ 4 - _
163.5 * Var ^ 3 + 460.25 * Var ^ 2 - 557.43 * Var + 313
Tx = Tx + Chr(Lt)
Next Var
MsgBox Tx, , "Papyty"
End Sub


--
@+
Thierry


Avatar
Papyty
Salut @ Tous, sabatier a écrit:
quand papyty rejoint garnote...chapeau!
jps

Papyty a écrit:
Salut Dédé

Pour ta signature ;-)))

Sub Message()
For Var = 1 To 5
Lt = Round(-5.7083 * Var ^ 4 + 68.917 * Var ^ 3 _
- 287.29 * Var ^ 2 + 481.08 * Var - 159, 0)
Tx = Tx + Chr(Lt)
Next Var
MsgBox Tx, , "Papyty"
End Sub



Ooooooups parti trop vite

Sub Message2()
For Var = 1 To 6
Lt = -1.5667 * Var ^ 5 + 26.25 * Var ^ 4 - _
163.5 * Var ^ 3 + 460.25 * Var ^ 2 - 557.43 * Var + 313
Tx = Tx + Chr(Lt)
Next Var
MsgBox Tx, , "Papyty"
End Sub

Mais y a encore du chemin avant de rejoindre garnote.
Salut JPS
--
@+
Thierry


Avatar
Fred
merci pour votre aide à tous

Fred
"Dédé" a écrit dans le message de
news:
mince ... parti sans demander son reste ...

Alors voici le lien concerné :
http://www.excelabo.net/xl/repertoires.php#filesearch

Autrement, ben ici :
http://www.excelabo.net/xl/repertoires.php

Est-ce que tu trouve ton bonheur ?
Salutations
Dédé

--
Pour me répondre, copiez cette formule dans excel ;-) et sur une seule
ligne

!

ÊR(83)&CAR(117)&CAR(103)&CAR(117)&CAR(115)&CAR(49)&CAR(50)&CAR(48)&CAR(48)


&CAR(50)&CAR(64)&CAR(121)&CAR(97)&CAR(104)&CAR(111)&CAR(111)&CAR(46)&CAR(102

)&CAR(114)

Sites de références,
Word :
http://faq.ms.word.free.fr/
Barre de menu disparues ? voir ici -
http://faq.ms.word.free.fr/Environnement/Environnement_reponses.htm#e1
Incrémentation chronologique ?
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v3
Chiffres en lettres ? (Word et Excel)
http://faq.ms.word.free.fr/VBA/VBA_reponses.htm#v4
Excel :
http://www.excelabo.net/
http://jacxl.free.fr/cours_xl/cours_xl_jac.html#accueil_xl
http://dj.joss.free.fr/faq.htm
http://perso.wanadoo.fr/frederic.sigonneau/
http://excel.1.free.fr/

"Fred" <nospam> a écrit dans le message de
news:
bonjour

je cherche à récupérer les sous répertoires d'un répertoire
dans une liste de choix.
j'ai trouvé sur disciplus des exemples de récupération de
fichiers mais je ne sais pas comment l'adapter pour des répertoires.
merci pour votre aide

Fred