Saltar al contenido

Extraer de una base de datos.


Recommended Posts

publicado

Hola que tal soy nuevo en el foro y la verdad es que hace tiempo que necesito solucionar este tema....

por ejemplo los datos estan en la base de datos y lo que necesito del otro lado.

[TABLE=width: 768]

[TR]

[TD=colspan: 4] base de datos

[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=colspan: 4]datos que necesito[/TD]

[/TR]

[TR]

[TD]Fecha[/TD]

[TD]Cuit[/TD]

[TD]Importe[/TD]

[TD]percepcion[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[/TR]

[TR]

[TD=align: right]01/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]100[/TD]

[TD=align: right]5[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]01/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]100[/TD]

[TD=align: right]5[/TD]

[/TR]

[TR]

[TD=align: right]02/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]200[/TD]

[TD=align: right]0[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]03/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]100[/TD]

[TD=align: right]10[/TD]

[/TR]

[TR]

[TD=align: right]03/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]100[/TD]

[TD=align: right]10[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]04/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]300[/TD]

[TD=align: right]10[/TD]

[/TR]

[TR]

[TD=align: right]04/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]300[/TD]

[TD=align: right]10[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]05/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]300[/TD]

[TD=align: right]5[/TD]

[/TR]

[TR]

[TD=align: right]05/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]300[/TD]

[TD=align: right]5[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]08/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]450[/TD]

[TD=align: right]1[/TD]

[/TR]

[TR]

[TD=align: right]06/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]350[/TD]

[TD=align: right]0[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]09/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]500[/TD]

[TD=align: right]3[/TD]

[/TR]

[TR]

[TD=align: right]07/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]400[/TD]

[TD=align: right]0[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]10/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]550[/TD]

[TD=align: right]4[/TD]

[/TR]

[TR]

[TD=align: right]08/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]450[/TD]

[TD=align: right]1[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]12/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]650[/TD]

[TD=align: right]4[/TD]

[/TR]

[TR]

[TD=align: right]09/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]500[/TD]

[TD=align: right]3[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD=align: right]14/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]750[/TD]

[TD=align: right]4[/TD]

[/TR]

[TR]

[TD=align: right]10/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]550[/TD]

[TD=align: right]4[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[/TR]

[TR]

[TD=align: right]11/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]600[/TD]

[TD=align: right]0[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[/TR]

[TR]

[TD=align: right]12/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]650[/TD]

[TD=align: right]4[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[/TR]

[TR]

[TD=align: right]13/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]700[/TD]

[TD=align: right]0[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[/TR]

[TR]

[TD=align: right]14/06/2012[/TD]

[TD=align: right]30999999999[/TD]

[TD=align: right]750[/TD]

[TD=align: right]4[/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[TD][/TD]

[/TR]

[/TABLE]

como podran ver es un sistema para pasar facturas y poder importar las percepciones. Obiamente que hay muchao mas datos pero necesito basicamente como puedo hacer para que al reconocer que no hay percepcion siga hasta encontrar donde si haya y traer los datos que necestio, y asi sucesivamente hasta terminar..

gracias espero que se entienda...

espero su respueta.

publicado

Hola shion

Bienvenido al Foro

Te recomiendo que leas detenidamente las Normas del Foro, entre otras cosas es necesario un Archivo como ejemplo, para que la respuesta sea lo más exacta posible.

Un Saludo

Lázaro

publicado

Buenas, shion

Haz caso a Lázaro y después obtendrás una respuesta a lo que solicitas. Te adelanto que es bastante sencillo, para que te des prisa en adjuntarlo.......jejejeje

Un saludo,

Tese

  • 2 weeks later...
publicado

Aca esta el ejemplo. Espero su respuesta. Lo que necesito es que de alguna manera me acomode sin dejar filas en blanco los datos de las facturas que tengan percepciones.

Gracias.

Ejemplo.xls

publicado
Prueba a ver que tal va.

Marco Antonio muchas gracias es algo parecido a lo que quiero pero el problema es que me esta costando adaptarlo a la planilla que uso yo. El error fundamental que me tira, es que me copia TODO no solo los titulos sino los formatos y este o no la percecpcion informada. Osea si tengo 100 compras y 50 percepciones me copia las 100 compras.

Espero tu respuesta.

GRACIAS !!!!!!!!

publicado

Otra de las cosas que noto es que me copia TODO. El tema es asi a ver si puedo explicarlo bien porque se me hace dificil.

Estoy haciendo un sistemita para liquidar impuestos (IVA e IIBB), el tema es que en las compras hay percepciones que, si son muchas, es un garron pasarlas de nuevo en el aplicativo. Pero como puse en el ejemplo, no todas las compras las tienen, entonces para poder hacer un archivo de importacion necesito que me copie los datos a una hoja distinta pero a si ves que si yo en esa hoja tengo formulas que no me las borre. La verdad es que es dificil de explicar, espero que me entiendan.

Gracias. Espero su respuesta.

publicado
Marco Antonio muchas gracias es algo parecido a lo que quiero pero el problema es que me esta costando adaptarlo a la planilla que uso yo. El error fundamental que me tira, es que me copia TODO no solo los titulos sino los formatos y este o no la percecpcion informada. Osea si tengo 100 compras y 50 percepciones me copia las 100 compras.

Espero tu respuesta.

Pues sube tu planilla, y especifica exactamente lo que quieres

.......El error fundamental que me tira.........

No te "tira" ningún error, hace exactamente lo que has pedido:

como puedo hacer para que al reconocer que no hay percepcion siga hasta encontrar donde si haya y traer los datos que necestio, y asi sucesivamente hasta terminar
publicado

De esta forma lo necesito, el tema es que es una planilla con 500 filas, solo pongo algunas para no hacer largo el archivo. Si me podes explicar los pasos que hace la macro mejor asi cuando tengo que modificar para las de Ingresos brutos no tenga problema. Gracias.

Ejemplo 2.xls

publicado

Aquí esta la macro:



Sub ObtenerPercepciones()

Application.ScreenUpdating = False
Sheets("Base de datos").Rows.Copy Sheets("Percepciones").Rows

For x = Sheets("Percepciones").Range("A" & Rows.Count).End(xlUp).Row To 4 Step -1
If Len(Trim(Sheets("Percepciones").Range("L" & x))) = 0 Then
Sheets("Percepciones").Rows(x).Delete
End If
Next

Sheets("Percepciones").Columns("M:T").Delete
Sheets("Percepciones").Columns("G:K").Delete
Sheets("Percepciones").Columns("B:C").Delete
Sheets("Percepciones").Rows("2:3").Delete
Sheets("Percepciones").Select

End Sub


[/CODE]

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.