le_sablais
XLDnaute Nouveau
Bonjour à tous,
Me voilà pour ma première question sur ce forum, j'ai beaucoup navigué pour trouver une réponse et je n'ai pas trouvé la réponse attendue.
Voilà mon souci. Je travaille sur une base de données Excel comportant plusieurs onglets selon les clients de l'entreprise. Chaque semaine, je reçois une base de données excel avec diverses informations. J'ai réussi à utiliser les filtres élaborés pour dispacher ces données dans les différents onglets clients.
Cependant je recherche à pouvoir "ajouter" les nouvelles données que je reçois à la suite de celles déjà stockées dans les onglets.
Je me demandais donc si il n'y avait pas un moyen de modifier "CopyToRange:=Range("A4)" pour que ça se colle à la suite de ce qu'il y a déjà.
Sub filtre()
'
' filtre Macro
'
Sheets("Fauil1").Cells.AdvancedFilter Action:=xlFilterCopy, CriteriaRange _
:=Range("Feuil1!Criteria"), CopyToRange:=Range("A4"), Unique:=False
End Sub
Tout ça être peu être un peu vague,.
Merci d'avance à celles et ceux qui se pencheront sur ce fil. Vous trouverez ci-joint un fichier ressemblant à l'original pour mieux comprendre.
Thomas
Me voilà pour ma première question sur ce forum, j'ai beaucoup navigué pour trouver une réponse et je n'ai pas trouvé la réponse attendue.
Voilà mon souci. Je travaille sur une base de données Excel comportant plusieurs onglets selon les clients de l'entreprise. Chaque semaine, je reçois une base de données excel avec diverses informations. J'ai réussi à utiliser les filtres élaborés pour dispacher ces données dans les différents onglets clients.
Cependant je recherche à pouvoir "ajouter" les nouvelles données que je reçois à la suite de celles déjà stockées dans les onglets.
Je me demandais donc si il n'y avait pas un moyen de modifier "CopyToRange:=Range("A4)" pour que ça se colle à la suite de ce qu'il y a déjà.
Sub filtre()
'
' filtre Macro
'
Sheets("Fauil1").Cells.AdvancedFilter Action:=xlFilterCopy, CriteriaRange _
:=Range("Feuil1!Criteria"), CopyToRange:=Range("A4"), Unique:=False
End Sub
Tout ça être peu être un peu vague,.
Merci d'avance à celles et ceux qui se pencheront sur ce fil. Vous trouverez ci-joint un fichier ressemblant à l'original pour mieux comprendre.
Thomas
Pièces jointes
Dernière édition: