Import Image depuis serveur ftp

fp22us

XLDnaute Nouveau
Bonjour le forum,
J'essaye d'importer des images sur un fichier excel a partir d'un serveur ftp.
Les images sont stockees dans des sous-repertoires qui changent de nom chaque semaine.
J'ai donc pense a utiliser la fonction filesearch (j'utise excel 2003), de mainiere a obtenir un nom de chemin specifique au fichier recherché pour pouvoir ensuite l'importer dans mon fichier.
Le probleme est que ca ne marche pas avec le serveur ftp. Ca marche pourtant bien si je remplace le chemin par C:\...

Voici mon code, si vous avex des idees, pour l'importation a partir de serveur ftp, ou pour lister des repertoires d'un serveur ftp, n'hesitez pas a me répondre.

Merci


Sub Liste()
Application.ScreenUpdating = False
Dim mypath As String
Dim i As Integer
mypath = "ftp://toto/images/mon repertoire\"
With Application.FileSearch
.NewSearch
.LookIn = mypath
.SearchSubFolders = True
.Filename = "10093_WPK.jpg"
.Execute msoSortByFileName
For i = 1 To .FoundFiles.Count
Cells(i, 1) = .FoundFiles(i)
Next i
End With
Application.ScreenUpdating = True
End Sub
 

Statistiques des forums

Discussions
312 305
Messages
2 087 084
Membres
103 459
dernier inscrit
Arnocal