registros coincidentes en un campo a otra tabla

12/01/2005 - 16:23 por Manolo Texaco | Informe spam
Hola compañeros. Mi pregunta es la siguiente:

Tengo una tabla (desgloseFacturas) donde tengo todas las entradas de las
facturas con sus diversos campos, entre ellos el número de factura.

Ahora, en otra hoja, me gustaría presentar todos los registros que coincidan
con el número de factura que yo escriba en una celda.

He mirado buscarv y buscarh, pero según parece,solo encuentran la primera, y
necesito tenerlas todas.

Alguna sugerencia?

Muchas gracias. Un saludo.

Preguntas similare

Leer las respuestas

#1 Anonimo
12/01/2005 - 17:54 | Informe spam
Hola Manolo "Lubricantes" :-)
Ahora, en otra hoja, me gustaría presentar todos los




registros que coincidan con el número de factura que yo
escriba en una celda.

..Puedes especificar en que 'hoja' 'columnas' etc...se
encuentran los datos que buscaras y 'desde' donde lo
haces 'celda especifica Hoja etc'.despues de
encontrarlo ¿Que hacer? enviar nuevamente a cual hoja?
o..Comentas datos adicionales :-}

Saludos
Lisandro

Hola compañeros. Mi pregunta es la siguiente:

Tengo una tabla (desgloseFacturas) donde tengo todas las


entradas de las
facturas con sus diversos campos, entre ellos el número


de factura.

Ahora, en otra hoja, me gustaría presentar todos los


registros que coincidan
con el número de factura que yo escriba en una celda.

He mirado buscarv y buscarh, pero según parece,solo


encuentran la primera, y
necesito tenerlas todas.

Alguna sugerencia?

Muchas gracias. Un saludo.


.

Respuesta Responder a este mensaje
#2 Manolo Texaco
13/01/2005 - 00:54 | Informe spam
Hola Anónimo. Te comento.

Pongamos el siguiente caso.

Tabla de desgloseFactura (hoja1) con sus correspondientes campos (columnas)
incluido número de factura.

En otra hoja (hoja2, por ejemplo llamada factura), deseo que cuando yo
escriba algo en una celda (la que sea... pongamos a1), me aparezcan todos
los camops de la tabla creada en la hoja1 (desgloseFactura) donde el número
de factura corresponda al escrito en la celda a1 de la hoja2 (factura).

De momento solo eso... que me aparezcan todos los registros (filas) de la
hoja1 que se corresponden con el número de factura elegida (a1).

Espero haberme expresado con mayor claridad.

Un saludo.

escribió en el mensaje
news:05e901c4f8c7$5cfafef0$
Hola Manolo "Lubricantes" :-)
Ahora, en otra hoja, me gustaría presentar todos los




registros que coincidan con el número de factura que yo
escriba en una celda.

..Puedes especificar en que 'hoja' 'columnas' etc...se
encuentran los datos que buscaras y 'desde' donde lo
haces 'celda especifica Hoja etc'.despues de
encontrarlo ¿Que hacer? enviar nuevamente a cual hoja?
o..Comentas datos adicionales :-}

Saludos
Lisandro

Hola compañeros. Mi pregunta es la siguiente:

Tengo una tabla (desgloseFacturas) donde tengo todas las


entradas de las
facturas con sus diversos campos, entre ellos el número


de factura.

Ahora, en otra hoja, me gustaría presentar todos los


registros que coincidan
con el número de factura que yo escriba en una celda.

He mirado buscarv y buscarh, pero según parece,solo


encuentran la primera, y
necesito tenerlas todas.

Alguna sugerencia?

Muchas gracias. Un saludo.


.

Respuesta Responder a este mensaje
#3 KL
13/01/2005 - 03:17 | Informe spam
Hola Manolo,

Prueba el siguiente codigo q yo habia compuesto para un caso parecido en
este foro. Lo he modificado ligeramente para q tome en cuenta los detalles q
has especificado.

Saludos,
KL

'Inicio Codigo
Sub ExtraerDatos()
Dim c As Range, uCol As Integer
Dim Fila As Long, uFila As Long
Dim miBaseDeDatos As Range
Dim miNumeroFactura As Range
Dim miExtracto As Range

Application.ScreenUpdating = False

'Establece el rango de la base de datos
With Sheets("desgloseFactura")
uFila = .Cells(.Rows.Count, 1).End(xlUp).Row
uCol = .Cells(1, .Columns.Count).End(xlToLeft).Column
Set miBaseDeDatos = .Range(Cells(2, 1), Cells(uFila, uCol))
End With

'en la hoja FACTURA establece la celda
'donde se pondra el numero de pedido a evaluar
'y la celda a partir de la cual se intriducirian
'los datos extraidos.
With Sheets("FACTURA")
Set miExtracto = .Range("A3")
Set miNumeroFactura = .Range("A1")
End With

'Borra el extracto anterior. Ojo: hay q asegurar
'q la ultima fila, ni la ultima columna del listado
'generado toquen otras celdas con datos q puedan
'haber en la factura. O sea q siempre haya una fila
'y una columna entremedio. Si no, se borraria el
'contenido de todas las celdas adyacentes.
miExtracto.CurrentRegion.ClearContents

For Each c In miBaseDeDatos.Columns(1).Cells
If c = miNumeroFactura Then
For n = 0 To miBaseDeDatos.Columns.Count - 1
miExtracto.Offset(Fila, n) = c.Offset(0, n)
Next n
Fila = Fila + 1
End If
Next c
Application.ScreenUpdating = True

End Sub
'Fin Codigo



"Manolo Texaco" wrote in message
news:eiEfbIQ%
Hola Anónimo. Te comento.

Pongamos el siguiente caso.

Tabla de desgloseFactura (hoja1) con sus correspondientes campos
(columnas) incluido número de factura.

En otra hoja (hoja2, por ejemplo llamada factura), deseo que cuando yo
escriba algo en una celda (la que sea... pongamos a1), me aparezcan todos
los camops de la tabla creada en la hoja1 (desgloseFactura) donde el
número de factura corresponda al escrito en la celda a1 de la hoja2
(factura).

De momento solo eso... que me aparezcan todos los registros (filas) de la
hoja1 que se corresponden con el número de factura elegida (a1).

Espero haberme expresado con mayor claridad.

Un saludo.

escribió en el mensaje
news:05e901c4f8c7$5cfafef0$
Hola Manolo "Lubricantes" :-)
Ahora, en otra hoja, me gustaría presentar todos los




registros que coincidan con el número de factura que yo
escriba en una celda.

..Puedes especificar en que 'hoja' 'columnas' etc...se
encuentran los datos que buscaras y 'desde' donde lo
haces 'celda especifica Hoja etc'.despues de
encontrarlo ¿Que hacer? enviar nuevamente a cual hoja?
o..Comentas datos adicionales :-}

Saludos
Lisandro

Hola compañeros. Mi pregunta es la siguiente:

Tengo una tabla (desgloseFacturas) donde tengo todas las


entradas de las
facturas con sus diversos campos, entre ellos el número


de factura.

Ahora, en otra hoja, me gustaría presentar todos los


registros que coincidan
con el número de factura que yo escriba en una celda.

He mirado buscarv y buscarh, pero según parece,solo


encuentran la primera, y
necesito tenerlas todas.

Alguna sugerencia?

Muchas gracias. Un saludo.


.





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