NamedRange.FindPrevious(Object) Yöntem

Tanım

public Microsoft.Office.Interop.Excel.Range FindPrevious (object After);
abstract member FindPrevious : obj -> Microsoft.Office.Interop.Excel.Range
Public Function FindPrevious (Optional After As Object) As Range

Parametreler

After
Object

Daha önce aramak istediğiniz hücre. Bu, kullanıcı arabiriminden bir arama yapıldığında etkin hücrenin konumuna karşılık gelir. Denetimde AfterNamedRange tek bir hücre olması gerektiğini unutmayın. Aramanın bu hücreden önce başladığını unutmayın; yöntemi bu hücreye geri sarmalanana kadar belirtilen hücrede arama yapılmaz. Bu bağımsız değişken belirtilmezse, arama denetimdeki sol üst hücreden NamedRange önce başlar.

Döndürülenler

Range Belirtilen bilgileri içeren bir hücreyi temsil eden nesne.

Örnekler

Aşağıdaki kod örneği, denetimdeki FindNamedRange değere Seashell sahip ilk hücreyi bulmak için yöntemini kullanır. Örnek daha sonra değeri Seashell içeren FindNext bir sonraki hücreyi bulmak ve özgün hücreye dönmek için ve FindPrevious yöntemlerini kullanır. Son olarak örnek, ilk hücrenin içeriğini değerle Seashell kesmek ve B1 hücresine yapıştırmak için yöntemini kullanırCut.

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

private void FindValue()
{
    this.Range["A1"].Value2 = "Barnacle";
    this.Range["A2"].Value2 = "Seashell";
    this.Range["A3"].Value2 = "Star Fish";
    this.Range["A4"].Value2 = "Seashell";
    this.Range["A5"].Value2 = "Clam Shell";

    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", "A5"],
        "namedRange1");

    // Find the first occurrence of "Seashell".
    Excel.Range Range1 = namedRange1.Find("Seashell",
        Excel.XlLookAt.xlWhole, Excel.XlSearchOrder.xlByColumns,
        Microsoft.Office.Interop.Excel.XlSearchDirection.xlNext,
        false);

    // Find the next occurrence of "Seashell".
    Range1 = namedRange1.FindNext(Range1);

    // Return to the first occurrence of "Seashell".
    Range1 = namedRange1.FindPrevious(Range1);

    // Cut the range with the first "Seashell" and copy it to cell B1.
    Microsoft.Office.Tools.Excel.NamedRange namedRange2 =
        this.Controls.AddNamedRange(Range1, "namedRange2");
    namedRange2.Cut(this.Range["B1"]);
}
Private Sub FindValue()
    Me.Range("A1").Value2 = "Barnacle"
    Me.Range("A2").Value2 = "Seashell"
    Me.Range("A3").Value2 = "Star Fish"
    Me.Range("A4").Value2 = "Seashell"
    Me.Range("A5").Value2 = "Clam Shell"

    Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
        = Me.Controls.AddNamedRange(Me.Range("A1", "A5"), _
        "namedRange1")

    ' Find the first occurrence of "Seashell".
    Dim Range1 As Excel.Range = namedRange1.Find("Seashell", , , _
        Excel.XlLookAt.xlWhole, Excel.XlSearchOrder.xlByColumns, _
        Microsoft.Office.Interop.Excel.XlSearchDirection.xlNext, _
        False, False, )

    ' Find the next occurrence of "Seashell".
    Range1 = namedRange1.FindNext(Range1)

    ' Return to the first occurrence of "Seashell".
    Range1 = namedRange1.FindPrevious(Range1)

    ' Cut the range with the first "Seashell" and copy it to cell B1.
    Dim namedRange2 As Microsoft.Office.Tools.Excel.NamedRange _
        = Me.Controls.AddNamedRange(Range1, "namedRange2")
    namedRange2.Cut(Me.Range("B1"))
End Sub

Açıklamalar

Yöntemiyle aynı koşullarla eşleşen önceki hücreyi Find bulur.

Bu yöntem, seçimi veya etkin hücreyi etkilemez.

Arama belirtilen arama aralığının başına ulaştığında, aralığın sonuna doğru kaydırılır. Bu metin çevresinde kaydırma işlemi oluştuğunda aramayı durdurmak için, ilk bulunan hücrenin adresini kaydedin ve bulunan her ardışık hücre adresini kaydedilen bu adresle sınayın.

İsteğe Bağlı Parametreler

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

Şunlara uygulanır