NamedRange.AdvancedFilter(XlFilterAction, Object, Object, Object) Méthode
Définition
Important
Certaines informations portent sur la préversion du produit qui est susceptible d’être en grande partie modifiée avant sa publication. Microsoft exclut toute garantie, expresse ou implicite, concernant les informations fournies ici.
Filtre ou copie des données à partir d'une liste basée sur une zone de critères.
public object AdvancedFilter (Microsoft.Office.Interop.Excel.XlFilterAction Action, object CriteriaRange, object CopyToRange, object Unique);
abstract member AdvancedFilter : Microsoft.Office.Interop.Excel.XlFilterAction * obj * obj * obj -> obj
Public Function AdvancedFilter (Action As XlFilterAction, Optional CriteriaRange As Object, Optional CopyToRange As Object, Optional Unique As Object) As Object
Paramètres
- Action
- XlFilterAction
Il peut s’agir de l’une des valeurs suivantes XlFilterAction : xlFilterCopyxlFilterInPlace
- CriteriaRange
- Object
Zone de critères. Si cet argument est omis, aucun critère n'est spécifié.
- CopyToRange
- Object
Plage de destination pour les lignes copiées si Action
est xlFilterCopy. Sinon, cet argument est ignoré.
- Unique
- Object
true
pour filtrer seulement les enregistrements uniques ; false
pour filtrer tous les enregistrements qui répondent aux critères. La valeur par défaut est false
.
Retours
Exemples
L’exemple de code suivant définit des valeurs entières dans la plage de cellules de A1 à A5, puis utilise la AdvancedFilter méthode pour filtrer et copier les valeurs dans la plage de cellules commençant à B1.
Cet exemple concerne une personnalisation au niveau du document.
private void ActivateAdvancedFilter()
{
Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
this.Controls.AddNamedRange(this.Range["A1", "A5"],
"namedRange1");
this.Range["A1"].Value2 = 10;
this.Range["A2"].Value2 = 10;
this.Range["A3"].Value2 = 20;
this.Range["A4"].Value2 = 10;
this.Range["A5"].Value2 = 30;
namedRange1.AdvancedFilter(Excel.XlFilterAction.xlFilterCopy,
this.Range["B1"], true);
}
Private Sub ActivateAdvancedFilter()
Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
= Me.Controls.AddNamedRange(Me.Range("A1", "A5"), _
"namedRange1")
Me.Range("A1").Value2 = 10
Me.Range("A2").Value2 = 10
Me.Range("A3").Value2 = 20
Me.Range("A4").Value2 = 10
Me.Range("A5").Value2 = 30
namedRange1.AdvancedFilter(Excel.XlFilterAction.xlFilterCopy, , _
Me.Range("B1"), True)
End Sub
Remarques
Si la sélection initiale est une cellule unique, la région actuelle de cette cellule est utilisée.
Paramètres facultatifs
Pour plus d’informations sur les paramètres facultatifs, consultez Paramètres facultatifs dans les solutions Office.