XL 2021 Erreur 6 dépassement de capacité

[remi.myrtille]

Bonjour à tous,
j'ai trouvé un fichier de gestion des stoks mais quand je tape une référence supérieur à 10 chiffres le code erreur d'exécution 6 dépassement de capacité apparait.

Je ne suis pas très doué.
Merci pour votre aide.

En PJ mon fichier

 

[sylvanu]

Bonjour Remi, et bienvenu sur XLD,
Vous faites :

If .Cells(CompteurDeLigne, 1) = CLng(ComboRef) Then

Or Clng est limité à : -2,147,483,648 à 2,147,483,647
Tentez peut être avec CLngLng, qui lui est limité à : -9,223,372,036,854,775,808 à 9,223,372,036,854,775,807

Fonctions de conversion de types (VBA)

Référence de langage VBA pour Office

learn.microsoft.com

 

[JM27]

bonjour
Merci de laisser apparaitre le nom de l'auteur dans l'userform.
Avec cdbl ca passe aussi
de plus j'ai fais un peu de nettoyage

 

[remi.myrtille]

Merci Sylvanu super !

 

[remi.myrtille]

bonjour
Merci de laisser apparaitre le nom de l'auteur dans l'userform.

Bonjour JM27,

Effectivement en réduisant la fenêtre de l'userform suite à la suppéssion de cases votre nom c'est trouvé caché.
vous pouvez constaté que j'en ai supprimé un certain nombre...

 

[patricktoulon]

re
on aurait pu passer par Cdec aussi