![]() |
| Le forum de référence en programmation et développement. Articles, cours et tutoriels du débutant au chef de projet et DBA confirmé. | |||||||
|
|||||||
| Général VBA Forum général VBA . Pour les logiciels spécifiques (Access, Excel, Word, ...), postez dans les bons sous forums. |
![]() |
|
|
Outils de la discussion |
|
|
#1 (permalink) |
|
Invité de passage
![]() Date d'inscription: novembre 2007
Messages: 4
|
Bonjour,
J'envisageais d'utiliser ces quelques lignes de code VBA pour lister tous les fichiers d'un répertoire: Code :
ws = ThisWorkbook.Worksheets("MesFichiers")
With Application.FileFind
.Options = msoOptionsNew
.Filename = ""
.SearchPath = ThisWorkbook.Path
If .Execute > 0 Then
For i = 0 To .FoundFiles.Count - 1
j = j + 1
ws.Cells(j, 1) = Dir(.FoundFiles(i))
Next i
End If
End With
Après plusieurs heures passées à éplucher le forum VB de developpez.com et de quelques autres forums sans grand succès, j'ai cru comprendre que la méthode FileFind (alter ego de FileSearch de VBA pour PC) n'était plus supportée par VBA Mac. Quelqu'un peut me le confirmer? Comment contourner cette difficulté? Merci d'apporter un éclairage à ma lanterne, à la lumière bien terne dois-je avouer. |
|
|
|
|
![]() |
![]() |
||
FileFind ne marche pas / VBA Excel Mac
|
||
Offres d'
emploi informatique
sur Lesjeudis.com
|
| Outils de la discussion | |
|
|