Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment copier des données dans une autre feuille de calcul avec Advanced Filter dans Excel?

Normalement, nous pouvons appliquer rapidement Filtre avancé fonctionnalité pour extraire des données à partir 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, le message d'avertissement suivant s'affiche. Dans ce cas, comment pourriez-vous gérer cette tâche dans Excel?

Copier des données dans une autre feuille de calcul avec le filtre avancé à l'aide de la fonctionnalité de filtre avancé

Copiez les données dans une autre feuille de calcul avec Filtre avancé en utilisant le code VBA


Copier des données dans une autre feuille de calcul avec le filtre avancé à l'aide de la fonctionnalité de filtre avancé


Voici une solution de contournement 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 Data > Advanced, 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 Plage de liste, continuez à cliquer 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 voulez sortir le résultat filtré de la feuille active, puis cliquez sur OK bouton, 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é en utilisant le 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 la Microsoft Visual Basic pour applications fenêtre.

3. Cliquez 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 le filtre avancé:

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 d'invite est sorti pour vous permettre de sélectionner la plage de données que vous souhaitez filtrer, voir capture d'écran:

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

6. Aller en cliquant OK, dans la boîte de dialogue qui s'affiche, sélectionnez une cellule d'une autre feuille de travail 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.


Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe Créer une liste de diffusion et envoyer des emails ...
  • Super Formula Bar (éditez facilement plusieurs lignes de texte et de formule); Disposition de lecture (facilement lire et éditer un grand nombre de cellules); Coller à la gamme filtrée...
  • Fusionner les cellules / rangées / colonnes sans perdre de données; Contenu des cellules divisées; Combiner les lignes / colonnes en double... Prévenir les cellules en double; Comparer les plages...
  • Sélectionnez Dupliquer ou Unique Des rangées; Sélectionnez les lignes vierges (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux cahiers d'exercices; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de la formule; Créer automatiquement des références à plusieurs feuilles; Insérer des balles, Cases à cocher et plus ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre contenu de cellules et commentaires...
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial en gras, en italique ...
  • Combinaison de classeurs et de feuilles de calcul; Fusionner les tables en fonction des colonnes clés; Fractionner les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF...
  • Plus que de puissantes fonctionnalités 300. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Fonctionnalités complètes Essai gratuit du jour 30.
kte tab 201905

Office Tab apporte une interface à onglets à Office et simplifie grandement votre travail

  • Activer l'édition par onglets et la lecture dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit le nombre de clics de souris pour vous chaque jour!
fond officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.