Como copio datos automaticamente?

04/11/2008 - 05:27 por Alexander Camejo | Informe spam
Amigos:

Ya he planteado este problema antes aqui pero sigo sin tener solucion.
A continuacion el texto original de mi primer planteamiento:
Quiero copiar automaticamente a otra hoja, las filas que coincidan con
un valor de una
de sus columnas. Es decir, dentro de un rango de datos ordenados por
campos cuyos nombres se hallan situados en la cabecera de las
columnas; existe una columna (B, por ejemplo) que puede poseer 2, 3 o
mas nombres. Lo que quiero es copiar automaticamente a otra hoja, toda
la(s) fila(s)
cuyo nombre en la columna B, sea "Pedro".

Muy amablemente me ha respondido uno de los suscriptores de este blog,
pero la verdad es que no me resuelve el problema con la
"automaticidad" que yo quiero.

Gracias nuevamente
Saludos
 

Leer las respuestas

#1 Héctor Miguel
04/11/2008 - 05:52 | Informe spam
hola, Alexander !

eso de "la automaticidad" que requieres (si no me equivoco) es la primera vez que lo mencionas -?-

a falta de los detalles "precisos" que permitan la (re)construccion de tu modelo "real" -?-
-> usa los filtros avanzados por codigo para "refrescar" los datos que consultes en cada ocasion (p.e.)
suponiendo que en tu hoja1 los titulos estan en el rango [A1:G1] (fecha, nombre, etc.)
por lo que tus registros inician en la fila 2

-> en la hoja2:
1) copia en la celda A1 el mismo titulo que tienes para nombre (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 hoja2:
(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("hoja1").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 __
Ya he planteado este problema antes aqui pero sigo sin tener solucion.
A continuacion el texto original de mi primer planteamiento:
Quiero copiar automaticamente a otra hoja, las filas que coincidan con un valor de una de sus columnas.
Es decir, dentro de un rango de datos ordenados por campos cuyos nombres se hallan situados en la cabecera de las columnas
existe una columna (B, por ejemplo) que puede poseer 2, 3 o mas nombres.
Lo que quiero es copiar automaticamente a otra hoja, toda la(s) fila(s) cuyo nombre en la columna B, sea "Pedro".
Muy amablemente me ha respondido uno de los suscriptores de este blog,
pero la verdad es que no me resuelve el problema con la "automaticidad" que yo quiero.

Preguntas similares