XL 2019 Message Box en cas d'erreur #N/A

  • Initiateur de la discussion Initiateur de la discussion JR.31
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

JR.31

XLDnaute Occasionnel
Bonjour,
Je bloque sur ce problème.
J'aimerais qu'un message box s'affiche quant dans la colonne "B" une erreur #N/A s'affiche, avec un bouton "OK" .
Pourriez-vous m'indiquer un début de solution svp.
Merci
 
Bonjour JR,
Vous pouvez faire par ex :
Code:
    For L = 1 To Range("B65500").End(xlUp).Row
        If WorksheetFunction.IsNA(Cells(L, "B")) Then
            MsgBox "Erreur N/A détectée en B" & L
        End If
    Next L
Ensuite, dans l'application il faut savoir qui peut provoquer cette erreur pour la détecter en temps réel ( par ex par modification de la colonne A )
Pour aller plus loin, il faudrait un petit fichier test. 😉
 
Bonjour,
à mettre dans le module de la feuille concernée
VB:
Private Sub Worksheet_Change(ByVal Target As Range)

If Application.IsNA(Target) = True Then MsgBox "Pas trouvé : cellule " & Target.Address

End Sub
Si on veut vraiment se cantonner à la colonne B :
Code:
Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target, [B:B]) Is Nothing Then _

If Application.IsNA(Target) = True Then MsgBox "Pas trouvé : cellule " & Target.Address

End Sub
A +
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
269
  • Question Question
Réponses
7
Affichages
186
  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
361
  • Question Question
Microsoft 365 Problème plantage
Réponses
14
Affichages
332
Réponses
15
Affichages
670
Réponses
8
Affichages
576
Retour