Erreur d'execution 6 - dépassement de capacité

Question

Comme dit le titre de mon sujet, j'ai un problème lors de l'exécution de ma macro qui me met erreur d'execution 6 . Le problème vient de cette ligne qui affiche comme valeur 1048576 lors du debogage LastLigne = (Range("V41").End(xlDown).Row) + 1 alors que la 1ere ligne non vide de ma plage de cellule est la ligne N°47. Bref j'en perds mon Latin !!! D'autant plus que lorsque je vaos dans ma feuille où se trouve ma plage de cellule et que j'exécute la macro via le lanceur de macro, alors tout marche bien !! Je vous joins un extrait de mon fichier. Si vous rentrer dans la cellule L4 de la feuille "Avril 2022" et que vous la valider avec entrée sans rien modifier alors cette erreur apparait. Avez-vous des solutions pour résoudre ce problème ? J'ai bien essayé de mettre les variables concernées en Long au lieu de Integer mais dans ce cas l'execution des macros moulinent pendant longtemps alors que les calculs sont simples et ne necessitent pas bcp de ressources. Merci à tous de votre aide pour vous penchez sur le sujet. A+ Wolf76...

Invité · Accepted Answer

Non, il faut définir vos variables correctement https://www.excel-pratique.com/fr/vba/variables Comme ça Dim LastLigne as Long A+...

LouReeD · Answer

Quel est le but de votre recherche ? Le résultat de votre recherche est la ligne 1048576 qui correspond à la dernière ligne de la feuille Excel, du coup avec le +1 vous dépassez la capacité ! Si votre recherche consiste à trouver la dernière ligne non vide d'une colonne il vaut mieux remonter la colonne : DerLignePleine = Range("A" & Rows.count).end(xlUp).Row, vous donnera la dernière cellule non vide de la colonne A en partant de la ligne la plus basse Rows.Count et en remontant End(xlUp) @ bientôt LouReeD...