Bonjour a tous

Dans une double boucle , une sur les lignes d'une feuille et l'autre sur les feuilles impaires du classeur je voudrais inserer un appel de macro en l'occurence "Affiche_0", pour quel soit lancer sur chaque feuille impaire, mais depuis mon code ci desous je ne vois pas comment faire.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
Dim I As Integer
   Dim j As Integer
Dim Retour As Integer
Dim WS_Count As Integer
 
 
     Retour = MsgBox("Voulez vous supprimer toute les lignes SPE", vbYesNo + vbCritical, "Attention")
     If Retour = vbYes Then
 
 
         WS_Count = ActiveWorkbook.Worksheets.Count
         For j = 5 To (WS_Count - 2) Step 2
 
         Affiche_0
 
          For I = 5 To Range("D65536").End(xlUp).Row
      If ActiveWorkbook.Worksheets(j).Cells(I, 3).Value = "SPE" Then
      ActiveWorkbook.Worksheets(j).Cells(I, 3).EntireRow.Delete
      I = I - 1
      End If
            Next I
   Next j
     Else
           Exit Sub
     End If
Merci d'avance