Rechercher dossiers (par ordre alphabétique)

sormick -
sormick - 27 mars 2017 à 08:17

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?


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

A voir également:

Rechercher dossiers (par ordre alphabétique)
Comment trier par ordre alphabétique sur excel - Guide
Classer les applications par ordre alphabétique iphone - Guide
Rechercher ou entrer l'adresse - Guide
Rechercher par image - Guide
Rechercher ou entrer l'adresse 4 - recherche google ✓ - Forum Réseaux sociaux

3 réponses

Réponse 1 / 3

cs_Le Pivert Messages postés 7904 Date d'inscription Statut Contributeur Dernière intervention 729

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

Réponse 2 / 3

sormick

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é

Réponse 3 / 3

sormick

Je viens de tester.ça fonctionne Impeccable avec VBhidden!

Merci beaucoup à la communauté CCM!

Discussions similaires

Tri les lettres d'un mot par ordre alphabétique

Comment classer des noms par ordre alphabétique dans un tableau?

Trier un tableau en ordre alphabétique

liste de noms par ordre alphabétique

Excel, classer par ordre alphabétique ?

Votre réponse

Discussions similaires