Comment copier des données vers une autre feuille de calcul avec le Filtre avancé dans Excel ?
La fonctionnalité Filtre avancé d'Excel vous permet d'extraire et de filtrer des données à partir d'un ensemble de données. Bien qu'elle fonctionne parfaitement au sein de la même feuille de calcul, vous pourriez rencontrer un message d'avertissement lorsque vous tentez de copier les résultats filtrés vers une autre feuille de calcul. Dans ce guide, nous vous montrerons étape par étape comment copier des données filtrées vers une autre feuille de calcul en utilisant à la fois la fonctionnalité Filtre avancé et du code VBA.
Copier des données vers une autre feuille de calcul avec le Filtre avancé en utilisant du code VBA
Copier des données vers une autre feuille de calcul avec le Filtre avancé en utilisant la fonctionnalité Filtre avancé
Voici une solution simple pour résoudre cette tâche, veuillez suivre ces étapes :
1. Activez la feuille de calcul où vous souhaitez copier le résultat filtré en utilisant la fonction Filtre avancé.
2. Cliquez ensuite sur Données > Avancé, voir capture d'écran :
3. Dans la boîte de dialogue Filtre avancé sélectionnez Copier vers un autre emplacement dans la section Action et cliquez ensuite sur le bouton pour sélectionner la plage de données que vous souhaitez filtrer dans une autre feuille à côté de la Plage de liste, continuez en cliquant sur le
bouton à côté de la Plage de critères pour sélectionner les critères depuis une autre feuille, voir capture d'écran :
4. Ensuite, cliquez sur le bouton à côté de la zone Copier vers pour sélectionner une cellule où vous souhaitez afficher le résultat filtré depuis 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.
Copier des données vers une autre feuille de calcul avec le Filtre avancé en utilisant du code VBA
Si vous êtes compétent en VBA, vous pouvez accomplir cette tâche en utilisant le code VBA suivant.
1. Activez la feuille de calcul que vous souhaitez filtrer et copier le résultat vers une autre feuille.
2. Maintenez les touches ALT + F11 enfoncées dans Excel, cela ouvre la fenêtre Microsoft Visual Basic for Applications.
3. Cliquez sur Insertion > Module, puis collez le code suivant dans la fenêtre Module.
Code VBA : Copier des données vers 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. Appuyez ensuite sur la touche F5 pour exécuter ce code, et une boîte de dialogue apparaît pour vous permettre de sélectionner la plage de données que vous souhaitez filtrer, voir capture d'écran :
5. Cliquez sur OK, et une autre boîte de dialogue apparaîtra, vous invitant à sélectionner la plage de critères pour le filtrage, comme indiqué dans la capture d'écran :
6. Continuez en cliquant sur OK, dans la boîte de dialogue qui apparaît, sélectionnez une cellule dans une nouvelle feuille où vous souhaitez afficher le résultat du filtre, voir capture d'écran :
7. Enfin, cliquez sur le bouton OK, les données filtrées ont été transférées dans une autre feuille spécifiée selon vos besoins.
Meilleurs outils de productivité Office
Dynamisez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité la plus essentielle pour vous...
Office Tab apporte une interface à onglets à Office, et facilite grandement votre travail
- Activez la modification et la lecture par onglets 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, au lieu d’ouvrir de nouvelles fenêtres.
- Augmentez votre productivité de50% et réduisez des centaines de clics de souris chaque jour!