Compartilhar via

Método NamedRange.Find

  • Artigo

Informações específicas de localiza no controle de NamedRange , e retorna um objeto de Microsoft.Office.Interop.Excel.Range que representa a primeira célula onde essa informação é encontrada.

Namespace:  Microsoft.Office.Tools.Excel
Assembly:  Microsoft.Office.Tools.Excel (em Microsoft.Office.Tools.Excel.dll)

Sintaxe

'Declaração
Function Find ( _
    What As Object, _
    After As Object, _
    LookIn As Object, _
    LookAt As Object, _
    SearchOrder As Object, _
    SearchDirection As XlSearchDirection, _
    MatchCase As Object, _
    MatchByte As Object, _
    SearchFormat As Object _
) As Range

Range Find(
    Object What,
    Object After,
    Object LookIn,
    Object LookAt,
    Object SearchOrder,
    XlSearchDirection SearchDirection,
    Object MatchCase,
    Object MatchByte,
    Object SearchFormat
)

Parâmetros

  • What
    Tipo: System.Object
    Os dados para procurar por.Pode ser uma cadeia de caracteres ou qualquer tipo de dados do Microsoft Office Excel.
  • After
    Tipo: System.Object
    A célula após o qual você deseja a pesquisa para iniciar o.Isso corresponde à posição da célula ativa quando uma pesquisa é feita da interface do usuário.Observe que After deve ser uma única célula no intervalo.Lembre-se de que a pesquisa começa após essa célula; a célula específica não é pesquisada até que a quebra automática do método envia de volta ao redor a essa célula.Se você não especificar esse argumento, inicia a pesquisa após a célula no canto superior esquerdo do intervalo.
  • MatchCase
    Tipo: System.Object
    true para procurar maiúsculas de minúsculas.O valor padrão é false.
  • MatchByte
    Tipo: System.Object
    Usado somente se você selecionou instalado ou suporte de linguagem de dois bytes. true para ter caracteres de byte duplo corresponde apenas caracteres de byte duplo; false para ter caracteres de byte duplo corresponder seus equivalentes de byte único.

Valor de retorno

Tipo: Microsoft.Office.Interop.Excel.Range
Um objeto de Microsoft.Office.Interop.Excel.Range que representa a primeira célula onde informações for encontrada.

Comentários

Esse método retorna nulluma referência nula (Nothing no Visual Basic) se nenhuma correspondência for encontrada.

Este método não afeta a seleção ou célula ativo.

As configurações para LookIn, LookAt, SearchOrder, e MatchByte são salvas cada vez que você use este método.Se você não especificar valores para esses argumentos na próxima vez que você chamar o método, os valores salvos é usado.Definir esses argumentos altera as configurações na caixa de diálogo localizar, e modificar as configurações na caixa de diálogo localizar modifica os valores salvos que são usados se você omitir argumentos.Para evitar problemas, definir esses argumentos explicitamente cada vez que você use este método.

Você pode usar os métodos de FindNext e de FindPrevious repetir a pesquisa.

Quando a pesquisa atingir o final do intervalo especificado de pesquisa, envolve ao redor para o início do intervalo.Para interromper uma pesquisa wraparound quando isso ocorre, salve o endereço da primeira célula encontrada, e testar em cada célula são endereço de localizar- neste endereço salvo.

Parâmetros Opcionais

Para obter informações sobre parâmetros opcionais, consulte Parâmetros opcionais em soluções do Office.

Exemplos

O exemplo de código a seguir usa o método de Find para encontrar a primeira célula com o valor Concha de mar em um controle de NamedRange .O exemplo usa os métodos de FindNext e de FindPrevious para localizar a célula seguinte com o valor Concha de mar e retornar à célula original.Finalmente, o exemplo usa o método de Cut para recortar o conteúdo da primeira célula com o valor Concha de mar e para colar-los na célula B1.

Este exemplo é para uma personalização da nível.

    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


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"]);
}

Segurança do .NET Framework

Consulte também

Referência

NamedRange Interface

Namespace Microsoft.Office.Tools.Excel