XL 2013 Actualisation automatique de la macro

[Rochdi92]

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

 

[Staple1600]

Bonsoir le fil

Ce n'est qu'une coincidence?

https://www.excel-downloads.com/thr...onglets-via-une-macro.20041635/#post-20299046

Ou karotte=Rochdi92 ? 😉

 

[Rochdi92]

Bonjour Staple 1600, je ne peux pas valider la réponse même si elle étaye un sujet similaire à ma problématique. Pourquoi ! J'ai besoin uniquement d'un module à rajouter qui sera automatiquement activé du moment qu'un de mes onglets change de structure à savoir une cellule de remplie ou une ligne de rajouté.
Je te remercie par avance pour le soutien que vous apportez.

 

[Rochdi92]

Voici la solution que j'ai trouvé :
Insérer dans thisworkbook (Alt+F11) avant :
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Call consolide_onglets
End Sub

A savoir qu'il faudra modifier consolide_onglets par le nom de la macro dont on veut l'automatisation.
Merci Staple pour ta réactivité