Menu

Erreur d'exécution 13 Incompatibilité de type [Résolu]

edlyg 8 Messages postés lundi 13 novembre 2017Date d'inscription 19 novembre 2017 Dernière intervention - 13 nov. 2017 à 20:01 - Dernière réponse : edlyg 8 Messages postés lundi 13 novembre 2017Date d'inscription 19 novembre 2017 Dernière intervention
- 13 nov. 2017 à 21:33
Bonsoir

Je suppose que la question a été posée plein de fois mais je débute et suis un peu démunie.
J'ai saisie le code VBA et exécuté ma macro une première fois sans problème.
Lorsque j'ai voulu ré-exécuter la macro j'ai eu un message Erreur d'exécution 13 Incompatibilité de type. Dans le code une ligne est surlignée en jaune mais je ne vois pas ce qui pose problème.
Voici la copie du code. C'est la ligne en gras qui est surlignée en jaune lorsque j'ouvre la modification




Vous remerciant par avance pour l'aide que vous pourrez m'apporter
Afficher la suite 

3 réponses

Répondre au sujet
0
Utile
Bonjour

Dans la ligne
N = Right(Range("C3").Value, 5)

tu définis N comme un String

ensuite tu fais comme si N était un nombre
Format(N + 1,"00000")

il faudrait plutot ecrire
Format (Val(N)+1, "00000")
Commenter la réponse de Yoda
yg_be 4670 Messages postés lundi 9 juin 2008Date d'inscriptionContributeurStatut 21 février 2018 Dernière intervention - 13 nov. 2017 à 20:44
0
Utile
bonjour,
je suggère de remplacer
Dim N
Sub Numéro

par
Sub Numéro 
Dim N as Long
Commenter la réponse de yg_be
edlyg 8 Messages postés lundi 13 novembre 2017Date d'inscription 19 novembre 2017 Dernière intervention - 13 nov. 2017 à 21:33
0
Utile
Merci Yoda
Ca marche nickel !
Commenter la réponse de edlyg