Remplir un tableau avec condition à partir d'une base
Bonjour,
Si joint la suite d'un sujet que j'ai déjà publié avant .. et là avec l'état actuel :
j'explique : j'ai une liste de données dans la feuille 1 que je veux mettre la feuille 2 ( parametres ) avec une certaines présentation. ( voir fichier )
J'ai également le code qui fonctionne sauf que ce dernier s'exécute lentement quand il y a bcp de données dans la feuille 1 ( dans le fichier ça marche quand même assez vite ) mais ma liste s'augmente chaque jours avec des nouvelles insertions .
+ d'explication avec le fichier .
Je cherche une méthode à ajouter dans le code pour que ce dernier reprenne les nouvelles insertions chaque jours ou une autre solution pour réduire le temps d'exécution ( voir des formules au lieux du code )
Merci par avance
J'ai testé exactement le code sur l'autre fichier qui a exactement la même forme !
j'ai l'erreur " type non compatible " sur les deux lignes :
Set Cel = Sheets("Feuil1").Columns("I").Find(what:=CSng(.Cells(3, I)) & .Cells(J, 1) & .Cells(J, 2), _
after:=Sheets("Feuil1").Range("I1"), LookIn:=xlValues, lookat:=xlWhole)
J'ai exactement la même forme comme le fichier exemple , j'ai uniquement changer le nom de la feuille et hope l'erreur
Bonsoir
Que dire ?
Sans le fichier en défaut, dur dur de trouver ce qui gène
Joins une copie anonymisée de ton fichier avec l'erreur
je vois ou est l'erreur , j'ai réussi à l'appliquer su le fichier ...
sauf que ça prenne un ti peu les 50 min