XL 2019 formulaire vba avec macro filtre avancé problème de copie sur une autre feuille

mallow2000 · 21 Février 2023

Bonjour,

J'ai un problème avec le filtre avancé. J'ai un formulaire VBA avec une combobox, une textbox pour les filtres, et une textlist pour exporter les résultats du filtre, tout cela commandé par une macro de filtre avancé. Cela ne fonctionne pas très bien . Le tri ne se fait pas toujours bien et surtout je me retrouve avec toutes les lignes de données copiées sur une la première feuille.
J'avoue que cela me dépasse un peu.

Pourriez-vous m'aider ? Je joints le fichier.

Merci beaucoup par avance.

Gégé-45550 · 21 Février 2023

Bonjour,
Essayer de modifier la Sub filter3() comme ceci :

VB:

Sub filter3()
'
' filter3 Macro
'

'
    Application.CutCopyMode = False
    Application.CutCopyMode = False
    Range("Tableau8[#All]").AdvancedFilter Action:=xlFilterCopy, CriteriaRange _
        :=Worksheets("SOURCES").Range("M1:M2"), CopyToRange:=Worksheets("SOURCES").Range("O1:W30"), Unique:=False
End Sub

Cordialement,

mallow2000 · 21 Février 2023

Gégé-45550 à dit:

Bonjour,
Essayer de modifier la Sub filter3() comme ceci :

VB:

Sub filter3()
'
' filter3 Macro
'

'
    Application.CutCopyMode = False
    Application.CutCopyMode = False
    Range("Tableau8[#All]").AdvancedFilter Action:=xlFilterCopy, CriteriaRange _
        :=Worksheets("SOURCES").Range("M1:M2"), CopyToRange:=Worksheets("SOURCES").Range("O1:W30"), Unique:=False
End Sub

Cordialement,

Trop bien merci beaucoup

Gégé-45550 · 21 Février 2023

mallow2000 à dit:
Trop bien merci beaucoup

N'hésitez pas à marquer les bonnes réponses comme 'SOLUTION' (la coche dans la cellule de droite).
Bonne journée

XL 2019 formulaire vba avec macro filtre avancé problème de copie sur une autre feuille

mallow2000

XLDnaute Nouveau

Pièces jointes

Gégé-45550

XLDnaute Accro

mallow2000

XLDnaute Nouveau

Gégé-45550

XLDnaute Accro

Discussions similaires