Erreur d'execution 91 sous Excel/VBA
Résolu/Fermé
maxbvs
Thierry17 - 30 janv. 2019 à 11:19
- Messages postés
- 2
- Date d'inscription
- jeudi 17 janvier 2008
- Statut
- Membre
- Dernière intervention
- 6 février 2008
Thierry17 - 30 janv. 2019 à 11:19
A voir également:
- Erreur 91 vba
- Vba erreur 91 - Meilleures réponses
- Erreur d'execution 91 vba - Meilleures réponses
- Erreur d'execution 91 sous Excel/VBA ✓ - Forum - VB / VBA
- "Erreur d'exécution 91" ✓ - Forum - Excel
- Erreur 91 VBA ✓ - Forum - VB / VBA
- VBA : Erreur d'exécution '91' : Variable objet ou variable de bloc With non déf ✓ - Forum - VB / VBA
- Erreur d’exécution '91' ✓ - Forum - VB / VBA
2 réponses
gbinforme
17 janv. 2008 à 22:23
- Messages postés
- 14935
- Date d'inscription
- lundi 18 octobre 2004
- Statut
- Contributeur
- Dernière intervention
- 24 juin 2020
17 janv. 2008 à 22:23
bonjour
Vous avez tenté d'utiliser une variable objet ayant la valeur Nothing.
C'est ce que dit la doc et en fait cela arrive souvent en utilisant "find" .
Je pense que c'est le fait d'utiliser activate car tu ne peux pas sélectionner ce que tu n'as pas trouvé.
Personnellement je positionne un objet range et je teste le nothing avant de l'employer.
set sel = Cells.Find(What:=pprod, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
if sel is nothing then
code pas trouvé
else
sel.select
endif
Vous avez tenté d'utiliser une variable objet ayant la valeur Nothing.
C'est ce que dit la doc et en fait cela arrive souvent en utilisant "find" .
Je pense que c'est le fait d'utiliser activate car tu ne peux pas sélectionner ce que tu n'as pas trouvé.
Personnellement je positionne un objet range et je teste le nothing avant de l'employer.
set sel = Cells.Find(What:=pprod, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlWhole, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False)
if sel is nothing then
code pas trouvé
else
sel.select
endif
30 janv. 2019 à 11:19