09/06/2009, 22:11
|
 | | | Fecha de Ingreso: abril-2008 Ubicación: Argentina
Mensajes: 93
Antigüedad: 16 años, 9 meses Puntos: 3 | |
| Respuesta: Función "Buscar" en VBA Excel
Celda por celda hast encontrar el valor buscado, utiliza contador para guardar la linea. Devuelve la columna C. Debes implementar que corte cuando la celda está en blanco y devolver algún resultado si no hay ocurrencias.
Dim Contador as single
Contador = 1
Do while True
If Range("datos!A" & trim(str(contador))) = valorBuscado Then
Exit Do
Else
Contador = Contador + 1
End If
Loop
Resultado = Range("Datos!C" & trim(str(contador))
Saludos. Gustavo. |