Localizar celdas de excel usando vb
Hola! Usando vb tengo que localizar las celdas de una columna de una hoja excel que contengan un cierto número p.j. El 5. Mi problema es que utilizando cells.find me detecta todas las celdas que contienen el nº 5, es decir no distingue entre 5 y 569. Y también quería saber que tengo que hacer para que en lugar de buscar en toda la hoja excel, solo busque en una columna. A ver si me podéis ayudar, gracias de antemano!
1 Respuesta
Respuesta de fejoal
1
La siguiente macro resuelve, tus dos preguntas:
Columns("C:C").Select
Selection.Find(What:="5", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False).Activate
Primero, seleccionas la columna (C) y luego utilizas la instrucción Find indicándole en el parámetro Lookat que busque todo. Es el equivalente a marcar en la ventana de diálogo del comando Buscar "Buscar sólo celdas completas"
Espero que esto te ayude, pero si te queda alguna duda, vuelve a preguntarme.
Un abrazo!
Fernando
Selection.FindNext(After:=ActiveCell).Activate
Columns("C:C").Select
Selection.Find(What:="5", After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False).Activate
Primero, seleccionas la columna (C) y luego utilizas la instrucción Find indicándole en el parámetro Lookat que busque todo. Es el equivalente a marcar en la ventana de diálogo del comando Buscar "Buscar sólo celdas completas"
Espero que esto te ayude, pero si te queda alguna duda, vuelve a preguntarme.
Un abrazo!
Fernando
Selection.FindNext(After:=ActiveCell).Activate
