Bonjour.
Votre feuille Base est vide. Dans ce cas Sheets("Base").Range("C3").End(xlDown).Row va jusqu'à la dernière ligne possible dans votre feuille. Et le dépassement de capacité a lieu quand vous ajoutez 1 à x (déclaré As Byte) valant 255.
Bonjour.
Votre feuille Base est vide. Dans ce cas Sheets("Base").Range("C3").End(xlDown).Row va jusqu'à la dernière ligne possible dans votre feuille. Et le dépassement de capacité a lieu quand vous ajoutez 1 à x (déclaré As Byte) valant 255.