lister des sous repertoirs

Question

Bonjours!
Voila je ne connais pas grands chose en VB, mais j'ai besoin d'en savoir un peu plus pour utilis&#233; les macro sous exel...
En effet je souhaite faire une base de donn&#233; et pour cela j'ai besoin de faire une listbox qui contiendrais la liste de tous les sous repertoir d'un de mes repertoir! lol (&#231;a peu parraitre compliquer, mais non, il suffi de relir! ^^)
une fois que l'on aurais choisi un des repertoir, il faudrais encore faire la meme manipe dans une autre listebox pour choisir les sous repertoir suivant, puis la m&#234;me manipe dans une dernier listbox mais pour choisir un fichier exel cette fois!
Et la ou les chose se complique c'est que les choix peuvent etre multiple!

je pense que &#231;a fais une bonne colle &#231;a ! ^^

S'il y avais une ame charitable pour m'aider... parceque je suis pas pret de m'en sortir seul !
(d'ailleur je crois que pour comprendre j'aurais besoin de beaucoup d'explication avec des petit ' ! ) lol

Merci d'avance ! ! !

cs_juju12 · Answer

Et tu veux pas utiliser CommonDialog par hasard (contr&#244;le qui affiche une bo&#238;te de dialogue 'Ouvrir' entre autres...) ?

cs_Keana · Answer

ben je sais pas... je ne connais pas... :s


J'en suis vraiment au balbusiment en VB, je suis contrain d'apprendre, comme je l'ai dis pour les macros... mais je gal&#232;re un peu (pour ne pas dir carrement...)

cs_JMO · Answer

Bonsoir,

Exemple d'un CommonDialog

MsgBox BrowseForFile("D:", "Fichier Excel|*.xls|")
Function BrowseForFile(pstrPath, pstrFilter)
Set objDialog = CreateObject("UserAccounts.CommonDialog")
objDialog.Filter = pstrFilter
objDialog.InitialDir = pstrPath
objDialog.Flags = &H80000 + &H4 + &H8
intResult = objDialog.ShowOpen
BrowseForFile = objDialog.FileName
end function

jean-marc

Lister des sous repertoirs

3 réponses

Discussions similaires