Bonjour,
Pourriez-vous être un peu plus explicite sur les problèmes rencontrés? Le titre mériterait également d'être plus clair...
Cordialement,
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.