Erreur d'exécution 13 Incompatibilité de type
Résolu/Fermé
edlyg
Messages postés
13
Date d'inscription
lundi 13 novembre 2017
Statut
Membre
Dernière intervention
16 août 2018
-
13 nov. 2017 à 20:01
edlyg Messages postés 13 Date d'inscription lundi 13 novembre 2017 Statut Membre Dernière intervention 16 août 2018 - 13 nov. 2017 à 21:33
edlyg Messages postés 13 Date d'inscription lundi 13 novembre 2017 Statut Membre Dernière intervention 16 août 2018 - 13 nov. 2017 à 21:33
A voir également:
- Erreur d'exécution 13 Incompatibilité de type
- Erreur 0x80070643 - Accueil - Windows
- Redmi note 13 5g test - Accueil - Téléphones
- Erreur 0x80070643 Windows 10 : comment résoudre le problème de la mise à jour KB5001716 - Accueil - Windows
- Erreur vidéo freebox ✓ - Forum TV & Vidéo
- Erreur 1001 outlook - Accueil - Bureautique
3 réponses
Bonjour
Dans la ligne
tu définis N comme un String
ensuite tu fais comme si N était un nombre
il faudrait plutot ecrire
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")
yg_be
Messages postés
23309
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
2 novembre 2024
Ambassadeur
1 550
13 nov. 2017 à 20:44
13 nov. 2017 à 20:44
bonjour,
je suggère de remplacer
par
je suggère de remplacer
Dim N Sub Numéro
par
Sub Numéro Dim N as Long
edlyg
Messages postés
13
Date d'inscription
lundi 13 novembre 2017
Statut
Membre
Dernière intervention
16 août 2018
13 nov. 2017 à 21:33
13 nov. 2017 à 21:33
Merci Yoda
Ca marche nickel !
Ca marche nickel !