Transfert contenu d'un dossier dans un autre dossier

cs_rodolph Messages postés 4 Date d'inscription lundi 12 avril 2004 Statut Membre Dernière intervention 8 juin 2004 - 8 juin 2004 à 19:41
ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 - 8 juin 2004 à 21:43
Salut à tous,

J'ai un petit problème en VBA, j'ai un dossier image qui contient des images ".gif" et ".jpg". J'ai envie de mettre ses images dans un autre dossier.

si quelqu'un à une idée, je suis preneur.

Merci d'avance.

RODDY

1 réponse

ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 25
8 juin 2004 à 21:43
salut

tu peux faire un qqch dans le genre :

tmp = dir$("c:\*.gif;*.jpg")

do while len(tmp)
filecopy "c:\nouvdoss" & tmp,"c:" & tmp
tmp=dir$
loop

'à vérifier si le premier arg de filecopy est le fichier destination (ou source)

voilà

ShareVB
0
Rejoignez-nous