XL 2013 Actualisation automatique de la macro

Bonjour à tous, j'ai besoin de vos mains d'experts concernant l'élaboration d'un fichier de suivi.
Concrètement, j'ai mis en place une macro pour regrouper les lignes des onglets remplis chaque jour par mes collègues.

Sub consolide_onglets()
Sheets("Suivi projets").[A1].CurrentRegion.Offset(1, 0).Clear
For Each s In Array("Chantal", "Claire", "Fanta", "JP", "Olivier", "Pascale", "Rochdi")
Sheets(s).[A1].CurrentRegion.Offset(1, 0).Copy _
Sheets("Suivi projets").[A65000].End(xlUp).Offset(1, 0)
Next s
End Sub

Ce dont j'ai besoin c'est que cette macro s'actualise du moment que n'importe quelle cellule change de valeur dans un des onglets d'un collègue.
Merci d'avance