XL 2013 Actualisation automatique de la macro

Rochdi92

XLDnaute Nouveau
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
 

Rochdi92

XLDnaute Nouveau
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

XLDnaute Nouveau
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é
 

Discussions similaires

Statistiques des forums

Discussions
311 725
Messages
2 081 944
Membres
101 849
dernier inscrit
florentMIG