Améliorer un code

Question

J'ai une macro qui fonctionne bien mais qui est lente à s'exécuter dans le fichier original. Le fichier original est légèrement lent de part son volume mais ça reste ok, seule la macro dans le fichier joint met 3 à 4 secondes pour s'exécuter. J'ai testé sur 2 autres pc et c'est la même chose. Du coup, je me demandais s'il serait possible d'alléger le code peut être. Je me suis pas mal fait aidé par chatgpt mais j'ai rapidement compris qu'il dépannait uniquement. Pour faire bref, j'ai plusieurs enclos de moutons. Chaque enclos a 2 béliers pour environ 10 brebis sur une certaine période. J'ai donc la date de placement puis la date de séparation (celle-ci est rempli lorsque les moutons changent d'enclos). Chaque individu est muni d'une puce et d'une ID (récupéré par recherchev sur une autre feuille). Si l'accouplement est observé, il est noté, sinon on saura lors de la mise bas dans quel enclos elle était et qui était le père. Les colonnes M et N me permettent de contrôler que je n'ai pas fait d'erreur au niveau de la saisie. Elles vérifient donc que la date de séparation d'un individu a bien saisie avant de saisir la date de placement de ce même individu dans un autre enclos sur au moins une journée de différence. Si je n'ai pas été assez clair n'hésitez pas, Merci d'avance pour votre aide...

Arturo83 · Accepted Answer

1ère remarque : votre tableau est un tableau structuré nommé "Tableau3", mais dans votre code, ça n'apparaît pas, si vous avez demandé à ChatGpt de vous fournir le code, il fallait lui préciser que vous travailliez sur un tableau structuré. 2ème remarque: sur cette ligne: ws.Range("F6:F" & 6 + Me.Brebis.Value - 1).FormulaLocal = "=RECHERCHEV(F" & i & "; Cheptel !$B$5:$R$1048576;2;0)" Quelle est la valeur de i ? Je suppose qu'il fait partie d'une boucle Fot next i , mais pas elle n'existe pas. donc i=0 La feuille " Cheptel " n'est pas visible, mais il serait bon dans déterminer la longueur réelle plutôt que de lui affecter le nombre de lignes max de 1048576, avec i =0 et le nombre de lignes max, la recherche peut voir son temps d'exécution augmenter. En corrigeant ces 2 points, cela devrait améliorer ce temps. Cdlt...

BsAlv · Answer

Re, n'est-ce pas plus facile/pratique d'avoir 3 tableaux structurés * tableau avec chaque bête individuel (male/female) + enclo + data placement + date séparation * tableau avec les accouplements observés * tableau avec les dates "mis bas" avec récalculation de l'accouplement + affirmation du père...