Vincular segun codigo y campaña

14/01/2009 - 04:33 por Davite | Informe spam
En una hoja llamada datos coloco la información de la sgte. forma:

codigo campaña fecha descripción velocidad peso uso
2233 1 01/2008 perno 5 mm 180 14
porta prensa
1386 1 01/2008 tronillo std. 194 11
varios
1232 1 02/2008 perno parker 192 34
tijeras
2233 2 04/2008 perno 5 mm 184 15
carcaza cabeza
1386 2 03/2008 tornillo std. 190
10 específico

En otra hoja llamada información busco conseguir lo siguiente:
A1 B1
codigo 2233

codigo campaña fecha descripción velocidad peso uso
2233 1 01/2008 perno 5 mm 180 14
porta prensa
2233 2 04/2008 perno 5 mm 184 15
carcaza cabeza

Que al colocar el código en la celda B1 me entregue todas las campañas
existentes (hasta 15 campañas) con toda la información requerida.

desde ya muchas gracias

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
14/01/2009 - 05:44 | Informe spam
hola, !

-> usa los filtros avanzados por codigo para "refrescar" los datos que consultes en cada ocasion (p.e.)
suponiendo que en tu hoja "daos" los titulos estan en el rango [A1:G1] (codigo, campana, etc.)
por lo que tus registros inician en la fila 2

-> en la hoja "informacion":
1) copia en la celda A1 el mismo titulo que tienes para codigo (o el campo que requieras para filtrar)
2) en la celda A2 vas a "solicitar" la id/codigo/nombre/... que requieras consultar
3) copia/pega (o escribe) las siguientes lineas => en el modulo de codigo de esta hoja "informacion":
(haz un clic-secundario sobre la etiqueta con su nombre y selecciona "ver codigo")

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$2" Then Exit Sub
Worksheets("datos").Range("a1").CurrentRegion.AdvancedFilter _
Action:=xlFilterCopy, _
CriteriaRange:=Range("a1:a2"), _
CopyToRange:=Range("a4:g4"), _
Unique:=False
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ OP __
En una hoja llamada datos coloco la informacion de la sgte. forma:
codigo campana fecha descripcion velocidad peso uso
2233 1 01/2008 perno 5 mm 180 14 porta prensa
1386 1 01/2008 tronillo std. 194 11 varios
1232 1 02/2008 perno parker 192 34 tijeras
2233 2 04/2008 perno 5 mm 184 15 carcaza cabeza
1386 2 03/2008 tornillo std. 190 10 especifico

En otra hoja llamada informacion busco conseguir lo siguiente:
A1 B1
codigo 2233

codigo campana fecha descripcion velocidad peso uso
2233 1 01/2008 perno 5 mm 180 14 porta prensa
2233 2 04/2008 perno 5 mm 184 15 carcaza cabeza

Que al colocar el codigo en la celda B1 me entregue todas las campanas existentes
(hasta 15 campanas) con toda la informacion requerida...
Respuesta Responder a este mensaje
#2 Davite
14/01/2009 - 19:11 | Informe spam
Hector probe la solución que me diste y me dio muy buen resultado voy a
completar los datos de la planilla y si se produce algun problema te comento.
Te agradezco mucho por tu respuesta tan rápida y certera de verdad espero que
no cambien nunca y asi poder seguir contando con ustedes.

saludos

davite


"Héctor Miguel" escribió:

hola, !

-> usa los filtros avanzados por codigo para "refrescar" los datos que consultes en cada ocasion (p.e.)
suponiendo que en tu hoja "daos" los titulos estan en el rango [A1:G1] (codigo, campana, etc.)
por lo que tus registros inician en la fila 2

-> en la hoja "informacion":
1) copia en la celda A1 el mismo titulo que tienes para codigo (o el campo que requieras para filtrar)
2) en la celda A2 vas a "solicitar" la id/codigo/nombre/... que requieras consultar
3) copia/pega (o escribe) las siguientes lineas => en el modulo de codigo de esta hoja "informacion":
(haz un clic-secundario sobre la etiqueta con su nombre y selecciona "ver codigo")

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$2" Then Exit Sub
Worksheets("datos").Range("a1").CurrentRegion.AdvancedFilter _
Action:=xlFilterCopy, _
CriteriaRange:=Range("a1:a2"), _
CopyToRange:=Range("a4:g4"), _
Unique:=False
End Sub

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ OP __
> En una hoja llamada datos coloco la informacion de la sgte. forma:
> codigo campana fecha descripcion velocidad peso uso
> 2233 1 01/2008 perno 5 mm 180 14 porta prensa
> 1386 1 01/2008 tronillo std. 194 11 varios
> 1232 1 02/2008 perno parker 192 34 tijeras
> 2233 2 04/2008 perno 5 mm 184 15 carcaza cabeza
> 1386 2 03/2008 tornillo std. 190 10 especifico
>
> En otra hoja llamada informacion busco conseguir lo siguiente:
> A1 B1
> codigo 2233
>
> codigo campana fecha descripcion velocidad peso uso
> 2233 1 01/2008 perno 5 mm 180 14 porta prensa
> 2233 2 04/2008 perno 5 mm 184 15 carcaza cabeza
>
> Que al colocar el codigo en la celda B1 me entregue todas las campanas existentes
> (hasta 15 campanas) con toda la informacion requerida...



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida