NamedRange.AdvancedFilter(XlFilterAction, Object, Object, Object) Yöntem

Tanım

Ölçüt aralığına göre verileri filtreler veya bir listeden kopyalar.

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

Parametreler

Action
XlFilterAction

Aşağıdaki XlFilterAction değerlerden biri olabilir: xlFilterCopyxlFilterInPlace

CriteriaRange
Object

Ölçüt aralığı. Bu bağımsız değişken atlanırsa, ölçüt yoktur.

CopyToRange
Object

ise Action kopyalanan satırların hedef aralığıdır xlFilterCopy. Aksi takdirde, bu bağımsız değişken yoksayılır.

Unique
Object

true yalnızca benzersiz kayıtları filtrelemek için; false ölçütlere uyan tüm kayıtları filtrelemek için. false varsayılan değerdir.

Döndürülenler

Örnekler

Aşağıdaki kod örneği, A1 ile A5 arasında yer alan hücre aralığındaki tamsayı değerlerini ayarlar ve ardından yöntemini kullanarak AdvancedFilter değerleri filtreleyip B1'den başlayarak hücre aralığına kopyalar.

Bu örnek, belge düzeyinde özelleştirme içindir

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

Açıklamalar

İlk seçim tek bir hücreyse, o hücrenin geçerli bölgesi kullanılır.

İsteğe Bağlı Parametreler

İsteğe bağlı parametreler hakkında bilgi için bkz. Office Çözümleri'nde İsteğe Bağlı Parametreler.

Şunlara uygulanır