Macro consolidation onglets ne fonctionne pas

[exene]

Bonjour,

Dans mon fichier je n'arrive pas à consolider dans l'onglet SYNTHESE les onglets MENAGE et CEDEX. C'est une macro que Jacques Boisgontier avait proposé dans une autre discussion et je ne comprends pas que cela ne fonctionne pas (mais je ne connais pas le VBA)

Merci pour votre aide

 

[gilbert_RGI]

Re : Macro consolidation onglets ne fonctionne pas

Bonjour

Sub Consolide()
  Sheets("SYNTHESE").[A1].CurrentRegion.Offset(1, 0).Clear
  For Each s In Array("MENAGE", "CEDEX")
      Sheets(s).[A1].CurrentRegion.Offset(1, 0).Copy _
          Sheets("SYNTHESE").[A65000].End(xlUp).Offset(1, 0)
   Next s
End Sub

signification du code

dans la feuille "synthese" la plage de la zone en cours (A2 ......) est effacée

ensuite on y copie les plages des feuille "Ménage" et "Cedex"

cette macro fonctionne ! ! 😱

 

[gilbert_RGI]

Re : Macro consolidation onglets ne fonctionne pas

seulement mettre un n° d'identifiant en colonne A

 

[exene]

Re : Macro consolidation onglets ne fonctionne pas

Bonjour et merci de me répondre

Je viens d'essayer à nouveau mais quand j'active la macro dans la feuille SYNTHESE, je n'obtiens que les données de l'onglet CEDEX 😕

@+

Pas vu ton message (collision). Merci

 

[gilbert_RGI]

Re : Macro consolidation onglets ne fonctionne pas

voilà ce que ça donne avec un identifiant

😱

 

[exene]

Re : Macro consolidation onglets ne fonctionne pas

Re,

Super

Encore merci