Obtener el numero de la fila de un valor buscado

Que espero que con sus conocimientos pueda ser solventada.
Necesito saber el valor de la linea (en excel) donde esta ubicado un valor encontrado con la función VLookUp, para así poder modificarlo utilizando un form.
Espero entiendas la duda, si necesitas más explicación sin problema extiendo la explicación.

3 respuestas

Respuesta
1
¿Te servirá esto?
Suponiendo que estuviéramos en A1
Con Activecell.Address y ActiveCell.AddressLocal muestra $A$1
ActiveCell. Column mostraría 1, al igual que ActiveCell. Row
Hola!
Gracias por tu respuesta.
Es más o menos eso lo que necesito, pero ubicando la linea exacta donde esta el valor encontrado por la función VLookUp.
Es decir, si uso la función VLookUp para un numero, el cual se encuentra en la fila 17 de la hoja de excel, necesito saber como hacer para obtener que esa fila de este caso es 17 para poder modificarla.
El valor de la fila sera distinta, cada vez que se ejecute la función VLookUp, dependiendo del caso.
Espero que hayas entendido lo que explico y que puedas ayudarme.
Muchísimas gracias.
Desconozco si excel trae una función así como vlookup para obtener el numero de fila, donde haya encontrado el valor buscado. Tendrías que buscar si existe.
Ahora, una pregunta: si vas a usar formularios y vas a usar macros, porque no usas alguna macro o la misma función vlookup dentro de la macro y definiendo:
if valorbuscado = true then
variable=Activecell.Row
End If
¿Si me explique?
Hola de nuevo.
Buscando en la red conseguí la solución.
Te la dejo para tu conocimiento:
Dim linea As Integer
Dim numche As Integer
Dim busco As Object
numche = conciliacion.txt1.Value
Set busco = Sheets("Banesco").Range("a6:a1000").Find(numche)
linea = busco.Row
Con esto obtienes la fila directamente de donde esta ubicado el valor que buscas. A mi me funciono.
Me parece que también con la ultima solución que me das se puede conseguir.
Muchas gracias por todo!
Respuesta
1

Y aquí una función para buscar una fila ingresando el rango y valor buscado:

Function FilaDelValor(Rng As Range, ValorBuscado As String) As Single 'devuelve la fila en la que se encuentra un valor

Dim fila As Single
Dim busco As Object
Set busco = Rng.Find(ValorBuscado)
FilaDelValor = busco.Row

End Function

luego la funcion se usa  usa asi 

Dim rn As Range
Dim st As String
Set rn = Workbooks("TABLAS.xlsx").Worksheets("ENLACE").Range("C1:C5200")
st = "GUA0089"
MsgBox FilaDelValor(rn, st)Dim rn As Range  'esta es la funcion con los argumentos rango y valor buscado
Obviamente hay que cambiar libro, hoja y rango.

Respuesta
1

Esta es otra opción que en mi opinión es más directa:

fila = WorksheetFunction.Match(Valor Buscado, Rango desde fila 1, FALSE)

fila = Application.Match(Valor Buscado, Rango desde fila 1, FALSE)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Userform o macro para buscar todos los datos de un cliente solo con el numero de CI, que están almacenados en una base de datos.

Hasta el momento tengo este formulario, lo que necesito es que al ingresar el numero de cédula y presionar el botón buscar automáticamente se llenen las casillas nombre, dirección, email y teléfono, todos estos datos los tengo ingresados en una base...
2 respuestas

Búsqueda Inteligente con Combobox VBA

Tengo el siguiente código que se lo aplico a un ComboCox, al seleccionar un dato debería completar otros 3 TextBox según la información de cada compañía. El problema es que cuando selecciono una compañía, esta me da la información de la línea...
2 respuestas

Como abro un hipervínculo desde un formulario en Excel

Tengo la siguiente pregunta por si alguien me puede ayudar. Tengo un formulario donde realizo consultas, en un textbox ingreso un dato y funciona como un buscarV, y en los siguientes textbox me completa con los datos que se encuentran en la misma...
1 respuesta

Buen día. Consulta con un código VBA

Tengo el siguiente código: Private Sub cmdConsulta_Click() Dim ApNom As String Dim idBusca As String Dim fila As Integer Application.ScreenUpdating = False Sheets("DIRECTORIO").Select fila = 0 ApNom = txtApellidoNombre Do While idBusca <> ApNom fila...
1 respuesta

Error 13 no coinciden los tipos Vba Excel

Estaba programando una macro que, a través de un formulario, ingresara los datos de otro libro (un registro) en la hoja inicial. La búsqueda de estos datos se realizaría a través de una macro que simula el funcionamiento de la función buscar...
1 respuesta

¿Crear una macro para seleccionar una columna mediante la búsqueda de un nombre?

Necesito crear una macro, que según el nombre que se elija, seleccione unos datos de una fila o columna y capearlo en otra hoja
1 respuesta

Resaltar filas duplicadas

He encontrado en el foro una macro (el experto no se halla disponible ahora si no hubiera contactado con él) para colorear los valores duplicados de una columna. Me gustaría modificar esa macro para que hiciera exactamente lo mismo pero en vez con...
2 respuestas

Macro Excel que haga referencia a uno o otro control

Esta macro la reconoces ¿Qué pretendo? Sub Seleccionar_Linea() 'comentado x Elsamatilde 'activa la celda A2 (de la hoja activa) Range("a2").Activate 'declara una variable que contendrá las celdas de la región actual Set Rango =...
1 respuesta

Macro listar valores únicos por tipologías eliminando duplicados

Anteriormente, pregunté sobre la macro para listar valores únicos por tipologías, me gustaría saber como solucionar un pequeño inconveniente y es que las tipologías se duplican dentro de la celda de resultados. Haría falta que una vez calcule las...
1 respuesta

Ocupo programar en VBA de Excel una macro utilizando la fórmula Lookup

Ocupo que el primer argumento de la fórmula sea un valor en una variable, en mi caso definí la variable "consecutivo" Dim Consecutivo As Range Set Consecutivo = ActiveCell Y posteriormente defino en otra celda la formula ActiveCell.FormulaR1C1 = _...
1 respuesta