Comment copier des données dans une autre feuille de calcul avec filtre avancé dans Excel?

Normalement, nous pouvons appliquer rapidement le Filtre avancé fonctionnalité pour extraire les données des données brutes dans la même feuille de calcul. Mais, parfois, lorsque vous essayez de copier le résultat filtré dans une autre feuille de calcul, vous obtenez le message d'avertissement suivant. Dans ce cas, comment pourriez-vous gérer cette tâche dans Excel?

Copier les données dans une autre feuille de calcul avec filtre avancé à l'aide de la fonction de filtre avancé

Copiez les données dans une autre feuille de calcul avec filtre avancé à l'aide du code VBA

Copier les données dans une autre feuille de calcul avec filtre avancé à l'aide de la fonction de filtre avancé

Voici une solution simple pour résoudre ce problème, procédez comme suit:

1. Activez la feuille de calcul dans laquelle vous souhaitez copier le résultat filtré à l'aide de la fonction Filtre avancé.

2. Puis clique Sauvegarde de > Avancé, voir capture d'écran:

3. Dans le Filtre avancé boîte de dialogue, sélectionnez Copier vers un autre emplacement du Action section, puis cliquez sur pour sélectionner la plage de données que vous souhaitez filtrer dans une autre feuille à côté du Gamme de liste, continuez en cliquant bouton à côté du Gamme de critères pour sélectionner les critères d'une autre feuille, voir capture d'écran:

4. Puis clique bouton à côté du Copier pour sélectionner une cellule dans laquelle vous souhaitez sortir le résultat filtré de la feuille active, puis cliquez sur OK , le résultat filtré a été extrait dans une autre feuille basée sur votre feuille de données d'origine.

Copiez les données dans une autre feuille de calcul avec filtre avancé à l'aide du code VBA

Si vous maîtrisez le code VBA, vous pouvez terminer ce travail avec le code VBA suivant.

1. Activez la feuille de calcul que vous souhaitez filtrer et copiez le résultat dans une autre feuille.

2. Maintenez le ALT + F11 clés dans Excel, et il ouvre le Microsoft Visual Basic pour applications fenêtre.

3Cliquez sur insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: Copiez les données dans une autre feuille de calcul avec Advanced Filter:

Sub Advancedfiltertoanothersheet()
'Updateby Extendoffice
    Dim xStr As String
    Dim xAddress As String
    Dim xRg As Range
    Dim xCRg As Range
    Dim xSRg As Range
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the filter range:", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xCRg = Application.InputBox("Please select the criteria range:", "Kutools for Excel", "", , , , , 8)
    If xCRg Is Nothing Then Exit Sub
    Set xSRg = Application.InputBox("Please select the output range:", "Kutools for Excel", "", , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    xRg.AdvancedFilter xlFilterCopy, xCRg, xSRg, False
    xSRg.Worksheet.Activate
    xSRg.Worksheet.Columns.AutoFit
End Sub

4. Et puis appuyez sur F5 clé pour exécuter ce code, et une boîte de dialogue s'affiche pour vous permettre de sélectionner la plage de données que vous souhaitez filtrer, voir capture d'écran:

5. Puis clique OK, et une autre boîte de dialogue apparaît pour vous rappeler de sélectionner la plage de critères sur laquelle vous souhaitez filtrer, voir capture d'écran:

6. Continuez à cliquer OK, dans la boîte de dialogue qui apparaît, veuillez sélectionner une cellule d'une autre nouvelle feuille de calcul dans laquelle vous souhaitez afficher le résultat du filtre, voir capture d'écran:

7. Enfin, cliquez OK bouton, les données filtrées ont été sorties dans une autre feuille spécifiée selon vos besoins.