Partager via


NamedRange.AdvancedFilter(XlFilterAction, Object, Object, Object) Méthode

Définition

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.

S’applique à