Afficher un message
Vieux 21/05/2006, 02h53   #2 (permalink)
Charly2
XLDnaute Accro
 
Avatar de Charly2
 
Date d'inscription: octobre 2005
Version Excel : Excel 2000 (PC)
Messages: 1 919
Par défaut Re:Code ne fonctionne plus

Bonsoir Manon, bonsoir (eh oui... encore !!!) à toutes et à tous

Avec une erreur de ce genre :

ERREUR CODE 13 = incompatibilité de type, sur la ligne :

For i = 1 To UBound(noms_de_fichiers)

c'est, à priori, que ta variable noms_de_fichiers n'est pas un tableau.

Tu devrais aller vérifier du côté de Public Function créer_liste_fichiers(Filtre As String) qui ne doit pas retourner un tableau : as-tu bien des fichiers .xls et/ou es1 dans ton répertoire D:\\Clients (existe-t-il sur ta machine ?)

Fais un test après l'appel de ta fonction pour vérifier que noms_de_fichiers ne contient pas la valeur Empty.

Bon courage

A+
__________________
Amicalement,
Charly2
Charly2 est déconnecté   Réponse avec citation