Macro en panne

[laloue54]

Bonjour,
Je viens d'ajouter une colonne dans l'onglet "GLOBAL" de mon fichier et ma macro ne fonctionne plus. La colonne "LIBELLE" ne se recopie pas dans les onglets "SAM", "SAHT" et "PE"
Qui pourrait m'expliquer pourquoi et comment y remédier.
Merci par avance, ci joint le fichier :

 

[TheLio]

Re : Macro en panne

Hello,
Un bout de piste,
^La formule de la zone nommée base doit être redéfinie:
=DECALER(GLOBAL!$A$1;;;NBVAL(GLOBAL!$A:$A);4)
Ensuite adapter ton code aux cellules de destinations
A++
Lio

 

[laloue54]

Re : Macro en panne

Bonjour THELIO
Je viens de modifier la macro, mais nada !
Qu'entends tu par : "Ensuite adapter ton code aux cellules de destinations"
Ce n'est pas moi qui ai fait cette macro, et je ne comprends pas comment elle fonctionne.
Merci pour ton aide

 

[laloue54]

Re : Macro en panne

merci TheLio
je viens de modifier la macro comme expliquer, mais nada !
Qu'entends tu par : "Ensuite adapter ton code aux cellules de destinations"
Je n'ai pas fait personnellement cette macro, et je ne comprends pas bien son fonctionnement. Peux tu encore m'aider ???

 

[Compte Supprimé 979]

Re : Macro en panne

Salut,

Il faut effacer le contenu des feuilles avant l'emploi du filtre avancé

Sub Macro1()
  For Each sh In Array("SAM", "SAHT", "PE")
    With Sheets(sh)
      ' Effacer le contenu de la feuille
      [COLOR=blue][B].Cells.ClearContents[/B][/COLOR]
      ' Utiliser la fonction de filtre avancé pour extraire les données
      Range("base").AdvancedFilter Action:=xlFilterCopy, _
      CriteriaRange:=Range(sh), CopyToRange:=.Range("A3"), Unique:=False
    End With
  Next sh
End Sub

Voilà A+

 

[laloue54]

Re : Macro en panne

Génial, ça marche : quel talent . Merci BrunoM45

 

[laloue54]

Re : Macro en panne

une dernière petite question, si je dois ajouter d'autres colonnes à "GLOBAL", je dois modifier autre chose à la formule ? Car après essai, rien ne se passe.

 

[TheLio]

Re : Macro en panne

Re,

le 4 =DECALER(GLOBAL!$A$1;;;NBVAL(GLOBAL!$A:$A);4)
Correspond aux nombres de collones après la collonne A donc si tu en rajoutes 2 du mets un 6 à la place
Voilà
A++
Lio