NamedRange.FindNext(Object) Yöntem
Tanım
Önemli
Bazı bilgiler ürünün ön sürümüyle ilgilidir ve sürüm öncesinde önemli değişiklikler yapılmış olabilir. Burada verilen bilgilerle ilgili olarak Microsoft açık veya zımni hiçbir garanti vermez.
yöntemiyle Find(Object, Object, Object, Object, Object, XlSearchDirection, Object, Object, Object) başlayan bir aramaya devam eder.
public Microsoft.Office.Interop.Excel.Range FindNext (object After);
abstract member FindNext : obj -> Microsoft.Office.Interop.Excel.Range
Public Function FindNext (Optional After As Object) As Range
Parametreler
- After
- Object
Arama yapmak istediğiniz hücre. Bu, kullanıcı arabiriminden bir arama yapıldığında etkin hücrenin konumuna karşılık gelir. Denetimde After
NamedRange tek bir hücre olması gerektiğini unutmayın. Aramanın bu hücreden sonra başlayacağını unutmayın. Yöntem, bu hücreye geri sarana kadar belirtilen hücre aranmaz. Bu bağımsız değişken belirtilmezse, arama denetimin sol üst köşesindeki hücreden NamedRange sonra başlar.
Döndürülenler
Range Belirtilen bilgileri içeren bir hücreyi temsil eden nesne.
Örnekler
Aşağıdaki kod örneği, bir 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 ardından ö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 bir sonraki hücreyi Find bulur.
Bu yöntem, seçimi veya etkin hücreyi etkilemez.
Arama belirtilen arama aralığının sonuna ulaştığında, aralığın başına 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ümleri'nde İsteğe Bağlı Parametreler.