VBA Erreur 13 quand tu me tiens...
Fermé
debutantVBA
Messages postés
2
Date d'inscription
lundi 7 juin 2010
Statut
Membre
Dernière intervention
7 juin 2010
-
7 juin 2010 à 21:11
gbinforme Messages postés 14939 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 7 juin 2010 à 22:45
gbinforme Messages postés 14939 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 - 7 juin 2010 à 22:45
A voir également:
- VBA Erreur 13 quand tu me tiens...
- Erreur 1004 vba ✓ - Forum VB / VBA
- Erreur d'execution 13 vba ✓ - Forum Programmation
- Macos 13 - Guide
- Find vba - Astuces et Solutions
- Erreur 1000 france tv - Forum MacOS
1 réponse
gbinforme
Messages postés
14939
Date d'inscription
lundi 18 octobre 2004
Statut
Contributeur
Dernière intervention
24 juin 2020
4 657
7 juin 2010 à 22:45
7 juin 2010 à 22:45
bonjour
Tout d'abord, changes :
car avec Byte tu ne peux pas dépasser 256 lignes.
Ensuite si tu supprimes une ligne, tu n'as rien à colorer et donc tu mets ceci en début :
Tu sortiras de ta macro si plus d'une cellule est concernée car dans ce cas tu ne peux pas tester ta valeur ce qui provoque ton erreur.
Tout d'abord, changes :
Dim Lig As Byte par Dim Lig As Long
car avec Byte tu ne peux pas dépasser 256 lignes.
Ensuite si tu supprimes une ligne, tu n'as rien à colorer et donc tu mets ceci en début :
If Target.Count > 1 Then Exit Sub
Tu sortiras de ta macro si plus d'une cellule est concernée car dans ce cas tu ne peux pas tester ta valeur ce qui provoque ton erreur.