Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 Erreur d'exécution '424' Objets requis - If Not Intersect

Randomuser

XLDnaute Nouveau
Bonjour tout le monde !

Je rencontre des difficultés dans ma feuille Excel:

Je souhaite copier la ligne entière quand la cellule de la colonne J à partir de J16 contient le mot "OK" ou "ANNULÉ".
"OK" et "ANNULÉ" produisent deux actions différentes:
  • Le mot "OK" copiera la ligne entière dans la feuille "Suivi MELCC" et supprimera cette ligne dans ma feuille active.
  • Le mot "ANNULÉ" copiera la ligne entière dans la feuille "Demandes annulées" et supprimera cette ligne dans ma feuille active.

J'ai une erreur d'exécution 424 - Objets requis lorsque j'inscris "OK" dans une cellule de la colonne J mais fonctionne très bien avec le mot "ANNULÉ"

 
Solution
Bonjour Randomuser, bienvenue sur XLD,

Enlevez le 1er End If et écrivez plus bas :
VB:
ElseIf Target = "ANNULÉ" Then
En effet il ne faut pas que le 2ème test soit évalué si Target a été supprimé.

A+

job75

XLDnaute Barbatruc
Bonjour Randomuser, bienvenue sur XLD,

Enlevez le 1er End If et écrivez plus bas :
VB:
ElseIf Target = "ANNULÉ" Then
En effet il ne faut pas que le 2ème test soit évalué si Target a été supprimé.

A+
 

Randomuser

XLDnaute Nouveau
Bonjour job75,

Problème résolu, il suffisait comme tu as dit que le second If soit transformé en ElseIF.

Merci beaucoup d'avoir pris le temps de m'avoir répondu et résolu le problème
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…