Bonjour à tous,

J'ai un problème avec ma macro sur une recherche de valeur contenant des #N/A.

Pour faire rapide, je souhaite qu'Excel face une recherche sur une plage donnée, et s'il rencontre un #N/A qu'il active le filtre de cette même plage.

J'ai créé le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 Set R = Sheets("extraction").Range("R:R").Find(Error)
   If Not R Is Nothing Then
   reponse = MsgBox("Il y a des #N/A dans le tableau d'extraction. Complétez la table avant édition du TCD", vbOKOnly)
   Selection.AutoFilter Field:=18, Criteria1:="#N/A"
   Else
    Sheets("Balance IG").Select
    Range("E8").Select
    ActiveSheet.PivotTables("Tableau croisé dynamique3").PivotCache.Refresh
    ActiveWindow.SelectedSheets.PrintOut Copies:=1
   End If
Le problème vient qu'il active la boite de dialogue qu'il y ait ou pas de #N/A. J'ai essayé avec la formule Each sauf qu'il m'affiche la boite à chaque #N/A.

Pouvez-vous m'aider ?

Je vous remercie par avance de votre aide.

Bonne journée à tous