Erreur d'exécution 13 Incompatibilité de type

Résolu
edlyg Messages postés 13 Statut Membre -  
edlyg Messages postés 13 Statut Membre -
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

3 réponses

  1. Yoda
     
    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")
    0
  2. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     
    bonjour,
    je suggère de remplacer
    Dim N
    Sub Numéro

    par
    Sub Numéro 
    Dim N as Long
    0
  3. edlyg Messages postés 13 Statut Membre
     
    Merci Yoda
    Ca marche nickel !
    0