Rechercher dossiers (par ordre alphabétique)
sormick
-
sormick -
sormick -
Bonjour,
je souhaiterais Adapter mon code VBA ci-dessous pour qu'il me trouve les dossiers d'une clé USB par ordre alphabétique et non par ordre aléatoire si possible sans trop modifier la macro.
Est-ce possible?
je souhaiterais Adapter mon code VBA ci-dessous pour qu'il me trouve les dossiers d'une clé USB par ordre alphabétique et non par ordre aléatoire si possible sans trop modifier la macro.
Est-ce possible?
Dim strPath As String
Dim objFSO2 As Object
Dim objFolder As Object
strPath = "f:" & "\"
Set objFSO2 = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO2.GetFolder(strPath2)
For Each objSubFolder In objFolder.subfolders
MsgBox objSubFolder.Name
Next objSubFolder
3 réponses
-
Bonjour,
Où en es-tu avec ce post?
Je vois que tu n'as pas compris ma dernière intervention!
https://forums.commentcamarche.net/forum/affich-34454465-empecher-l-ouverture-classeur-excel-une-deuxieme-fois
-
Bonjour,
Pardon je n'avais pas vu le tout dernier post qui parlait de ceci: vbHidden
je vais le tester tout de suite.
désolé -
Je viens de tester.ça fonctionne Impeccable avec VBhidden!
Merci beaucoup à la communauté CCM!
