Exécution Macro après une autre

Bonjour,

Je souhaite qu'une macro s'éxécute après une autre.

Contexte : j'ai un bouton qui éxécute diverses macros.

Private Sub CommandButton1_Click()
Call Moyenne
Call NomFeuille
Call FormuleDistance
Call FormuleVitesse
Call Decalage
Call TempsMoyen
Call TempsArret
Call EcartMoyenM
Call EcartMoyenS
End Sub

Ma macro EcartMoyenM s'éxécute si les cellules des colonnes B et D ne sont pas vides ( colonne B remplie par macro Moyenne et colonne D remplie manuellement).

Or en pas à pas détaillé, le sub EcartMoyenM boucle dans le vide car les cellules de la colonne B sont considérées vides alors qu'elles ne le sont pas.

Voici le code :

Sub EcartMoyenM()
For m = 4 To Range("D65536").End(xlUp).Row Step 1
 For n = 4 To Range("B65536").End(xlUp).Row Step 1
  For o = 4 To Range("H65536").End(xlUp).Row Step 1
   If Range("B" & n).Value <> 0 And Range("D" & n).Value <> 0 Then
    Range("H" & n).Value = Range("D" & n).Value - Range("B" & n).Value
   End If
  Next o
 Next n
Next m
End Sub

Merci de votre aide.

re,

Je ne comprends pas le pourquoi de cette ligne

For o = 4 To Range("H65536").End(xlUp).Row Step 1

Essaie ceci :

Sub EcartMoyenM()
For m = 4 To Range("D65536").End(xlUp).Row
 For n = 4 To Range("B65536").End(xlUp).Row
   If Range("B" & n).Value <> 0 And Range("D" & n).Value <> 0 Then
    Range("H" & n).Value = Range("D" & n).Value - Range("B" & n).Value
   End If
 Next n
Next m
End Sub

A te relire

Re,

Bonjour Dan .

Bah sans le For avec le o, cela fonctionne.

Une simple erreur VBA .... bloquait 2 macros.

Merci à toi.