J'ai créé un listing de données sur une feuille excel avec plusieurs colonnes.
J'ai placé un filtre sur quelques colonne pour filtrer ce listing.
Je souhaiterais sauvegarder sur une autre feuille le résultat du filtrage.
Malheureusement, si je selectionne, copie et passe le résultat du filtrage,
excel prend ttes les lignes (cad celles du filtre et celles n'appartenant pas
au filtre)...
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Bonjour pierref",
En supposant que ta feuille "Feuil1", le filtre est déjà appliqué, pour copier le résultat sur une nouvelle feuille, essaie ceci :
'------------------- Sub CopierRésultatDuFiltre()
Dim Sh As Worksheet Set Sh = Worksheets.Add With Worksheets("Feuil1") .Range("_FilterDataBase").SpecialCells(xlCellTypeVisible).Copy _ Sh.Range("A1") End With Set Sh = Nothing
End Sub '-------------------
Salutations!
"pierref" a écrit dans le message de news: Bonjour,
J'ai créé un listing de données sur une feuille excel avec plusieurs colonnes. J'ai placé un filtre sur quelques colonne pour filtrer ce listing.
Je souhaiterais sauvegarder sur une autre feuille le résultat du filtrage. Malheureusement, si je selectionne, copie et passe le résultat du filtrage, excel prend ttes les lignes (cad celles du filtre et celles n'appartenant pas au filtre)...
Merci de m'aider
A bientot
Bonjour pierref",
En supposant que ta feuille "Feuil1", le filtre est déjà appliqué, pour copier le résultat sur une nouvelle feuille, essaie ceci :
'-------------------
Sub CopierRésultatDuFiltre()
Dim Sh As Worksheet
Set Sh = Worksheets.Add
With Worksheets("Feuil1")
.Range("_FilterDataBase").SpecialCells(xlCellTypeVisible).Copy _
Sh.Range("A1")
End With
Set Sh = Nothing
End Sub
'-------------------
Salutations!
"pierref" <pierref@discussions.microsoft.com> a écrit dans le message de news: 30E343B4-88FD-4402-8925-854DFBD5137B@microsoft.com...
Bonjour,
J'ai créé un listing de données sur une feuille excel avec plusieurs colonnes.
J'ai placé un filtre sur quelques colonne pour filtrer ce listing.
Je souhaiterais sauvegarder sur une autre feuille le résultat du filtrage.
Malheureusement, si je selectionne, copie et passe le résultat du filtrage,
excel prend ttes les lignes (cad celles du filtre et celles n'appartenant pas
au filtre)...
En supposant que ta feuille "Feuil1", le filtre est déjà appliqué, pour copier le résultat sur une nouvelle feuille, essaie ceci :
'------------------- Sub CopierRésultatDuFiltre()
Dim Sh As Worksheet Set Sh = Worksheets.Add With Worksheets("Feuil1") .Range("_FilterDataBase").SpecialCells(xlCellTypeVisible).Copy _ Sh.Range("A1") End With Set Sh = Nothing
End Sub '-------------------
Salutations!
"pierref" a écrit dans le message de news: Bonjour,
J'ai créé un listing de données sur une feuille excel avec plusieurs colonnes. J'ai placé un filtre sur quelques colonne pour filtrer ce listing.
Je souhaiterais sauvegarder sur une autre feuille le résultat du filtrage. Malheureusement, si je selectionne, copie et passe le résultat du filtrage, excel prend ttes les lignes (cad celles du filtre et celles n'appartenant pas au filtre)...
Merci de m'aider
A bientot
pierref
Ca marche niquel.
Merci bcp
Bonjour pierref",
En supposant que ta feuille "Feuil1", le filtre est déjà appliqué, pour copier le résultat sur une nouvelle feuille, essaie ceci :
'------------------- Sub CopierRésultatDuFiltre()
Dim Sh As Worksheet Set Sh = Worksheets.Add With Worksheets("Feuil1") .Range("_FilterDataBase").SpecialCells(xlCellTypeVisible).Copy _ Sh.Range("A1") End With Set Sh = Nothing
End Sub '-------------------
Salutations!
"pierref" a écrit dans le message de news: Bonjour,
J'ai créé un listing de données sur une feuille excel avec plusieurs colonnes. J'ai placé un filtre sur quelques colonne pour filtrer ce listing.
Je souhaiterais sauvegarder sur une autre feuille le résultat du filtrage. Malheureusement, si je selectionne, copie et passe le résultat du filtrage, excel prend ttes les lignes (cad celles du filtre et celles n'appartenant pas au filtre)...
Merci de m'aider
A bientot
Ca marche niquel.
Merci bcp
Bonjour pierref",
En supposant que ta feuille "Feuil1", le filtre est déjà appliqué, pour copier le résultat sur une nouvelle feuille, essaie ceci :
'-------------------
Sub CopierRésultatDuFiltre()
Dim Sh As Worksheet
Set Sh = Worksheets.Add
With Worksheets("Feuil1")
.Range("_FilterDataBase").SpecialCells(xlCellTypeVisible).Copy _
Sh.Range("A1")
End With
Set Sh = Nothing
End Sub
'-------------------
Salutations!
"pierref" <pierref@discussions.microsoft.com> a écrit dans le message de news: 30E343B4-88FD-4402-8925-854DFBD5137B@microsoft.com...
Bonjour,
J'ai créé un listing de données sur une feuille excel avec plusieurs colonnes.
J'ai placé un filtre sur quelques colonne pour filtrer ce listing.
Je souhaiterais sauvegarder sur une autre feuille le résultat du filtrage.
Malheureusement, si je selectionne, copie et passe le résultat du filtrage,
excel prend ttes les lignes (cad celles du filtre et celles n'appartenant pas
au filtre)...
En supposant que ta feuille "Feuil1", le filtre est déjà appliqué, pour copier le résultat sur une nouvelle feuille, essaie ceci :
'------------------- Sub CopierRésultatDuFiltre()
Dim Sh As Worksheet Set Sh = Worksheets.Add With Worksheets("Feuil1") .Range("_FilterDataBase").SpecialCells(xlCellTypeVisible).Copy _ Sh.Range("A1") End With Set Sh = Nothing
End Sub '-------------------
Salutations!
"pierref" a écrit dans le message de news: Bonjour,
J'ai créé un listing de données sur une feuille excel avec plusieurs colonnes. J'ai placé un filtre sur quelques colonne pour filtrer ce listing.
Je souhaiterais sauvegarder sur une autre feuille le résultat du filtrage. Malheureusement, si je selectionne, copie et passe le résultat du filtrage, excel prend ttes les lignes (cad celles du filtre et celles n'appartenant pas au filtre)...
