Ricerca su directory Excel
Hai un problema con Excel?
| Ricerca file in una directory
di jjresti |
Vorrei fare una ricerca dei file in una directory e
visualizzarli in una list box, ho trovato un sacco di procedure in
rete, ma nessuna mi funziona! Suggerimenti?
With
Application.FileSearch .NewSearch .LookIn = "C:\backup"
.Filename = "*.*" If .Execute() > 0 Then MsgBox "E
vaiii!!!!" End If End With
|
|
| di Mauro |
La routine seguente fa una ricerca dei file nella
directory backup ed inserisce il risultato nella ListBox. Sub
prova() MyPath = "C:\backup\*.*" MyName = Dir(MyPath,
vbNormal) Do While MyName <> "" ListBox1.AddItem
MyName MyName = Dir Loop End Sub |
|
|
Vuoi approfondire questo argomento?