D'après moi il n'y a aucun moyen de "catcher" l'évenement insertion de ligne. Tu ne peux donc pas le faire de cette façon.
Tu peux contourner le problème en créant une macro te demandant à quelle ligne tu veux rentrer une ligne et qu'elle la rentre dans plusieur feuilles...
Sub rentrerligne()
x = InputBox("quelle ligne")
Sheets("Feuil1").Cells(x, 1).Insert
Sheets("Feuil2").Cells(x, 1).Insert
End Sub