Mostrar datos en base a el valor de una celda

[coopernico46]

Buenas tardes

He tratado de buscar en el Foro algo similar a lo que necesito pero como no he tenido mucha suerte por aqui lo dejo a ver si alguien puede ayudarme.

Pues bien, estoy tratando de hacer una especie de plantilla en un libro excel2000 de tal manera que la hoja 2 contiene una tabla con datos (en varias columnas) y en la hoja 1 pretendo mostrar los valores de la tabla de la hoja 2 que tengan por ejemplo el campo "Ubicación igual a Paris".

Esto para una sola linea de la hoja 2 he conseguido hacerlo con BUSCARV (buscando en la columna "Ubicación" el valor Paris y mostrando las columnas que esten en esa misma fila. El problema me surge cuando existen varias filas con el campo "Ubicación"=Paris.

Se que esto se peude hacer (mas o menos) utilizando la opcion Sub-totales pero me gustaria poder hacerlo por formulas o VB.

Un saludo

[Monimo]

Lo ideal seria recorrer toda la hoja con next y next asi:

supongamos que tienes tres columnas llenas de datos a,b y c y en c tienes la ubicacion. Podrias leer, todas las celdas de la columna c y donde valor_celda_de_la_columna_c="Paris" traer todo el renglon.

si lo encuentras muy trabajoso podrías intetntar esta macor:


on error resume next
Cells.Find(What:="Paris", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
, SearchFormat:=False).Activate
y ke lo haga mientras no haya error.
* aqui escribes en la otra hoja.....
*seleccionas la hoja 2 de nuevo

Cells.FindNext(After:=ActiveCell).Activate