Visual Basic para Aplicaciones - FUNCION EN VBA SIMILAR A BUSCARV

Life is soft - evento anual de software empresarial
   
Vista:

FUNCION EN VBA SIMILAR A BUSCARV

Publicado por Patricio Romero (10 intervenciones) el 31/05/2009 06:14:45
Estimados
Ojala me puedan ayudar con lo siguiente:

Tengo en la columna A el código de un articulo, en la columna B su categoría y en la columna C su descripción.
La columna C, la convertí en lista desplegable, y quiero que al seleccionar un producto me llame su respectivo código en la columna A
Esto no lo puedo hacer con la función BUSCARV porque la celda que quiero llenar esta a la 2 columnas a la izquierda de la columna que tiene la descripción del producto.
Tampoco puedo cambiar el orden porque ya estoy usando otro BUSCARV que está funcionando bien.
Que me recomiendas.

Esperando una favorable acogida.

De antemano, gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Visual Basic para Aplicaciones
- Código fuente de Visual Basic para Aplicaciones
- Cursos de Visual Basic para Aplicaciones
- Temas de Visual Basic para Aplicaciones
información
Códigos de Visual Basic para Aplicaciones
- Secuencia aleatoria
- Control de Stock
- Movimiento de las teclas

RE:FUNCION EN VBA SIMILAR A BUSCARV

Publicado por Sanchez Castello, S.L. (4 intervenciones) el 02/06/2009 13:09:49
Patricio, mira a ver si te ayuda este código...

Dim CeldaBuscada as Variant
Dim Resultado as Variant

CeldaBuscada= Activecell

Columns("C:C").Select

Selection.Find(What:= CeldaBuscada, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
True, SearchFormat:=False).Activate

Resultado = Activecell.Offset(0,-2)

Saludos

www.sanchezcastello.com
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar