¿Como crear numero de factura automatico en factura y guardar resumen?

[icabal]

Hola a todos

Recien comienzo a intentar aprender por mi cuenta VBA y estoy haciendo mi primer factura en la que quisiera que por medio de un boton se generase el numero de factura automaticamente y se copiaran: ese numero correspondiente de factura, el nombre del cliente y el importe. Dichos datos se guardan en otro libro a modo de resumen donde la primer columna es ese numero automatico generado, la segunda el nombre del cliente y finalmente el importe.

He estado mirando codigos y solo me he liado y estoy hecho una maraña. Si alguien pudiese orientarme, se lo agradeceria ampliamente.

Un saludo y gracias por la atencion.

[tese1969]

Buenas.......

Comienza por adjuntar un archivo ejemplo..........normas del foro.....

Un saludo,

Tese

[icabal]

Hola tese1969, gracias por atender

Desconozco la mecanica del foro... lo lamento. Adjunto un archivo de lo que ponia. En teoria quisiera tener varios libros excel con distintos clientes y que en otro libro resumen, se registre como lo pongo en la 2da pestaña.

Ansioso por tus sugerencias. Un saludo

Factura1.xls

[tese1969]

No me deja abrir tu archivo...........me lo bloquea el antivirus.............mira a ver si lo puedes subir comprimido en .rar......

Un saludo,

Tese

[icabal]

Hola

Te lo envio en .RAR nuevamente

Gracias

Factura1.rar

[tese1969]

¿Qué referencia debes tomar para generar el nuevo número de factura?

Necesitas que pase los datos de nº factura, cliente e importe total a "Resumen"......¿es eso?

Y suponiendo que Resumen está en otro libro, no?........es importante conocer la estructura de tu libro Resumen....es decir, a partir de qué línea estarían los datos y en qué columnas.......

Si no te supone mucho esfuerzo.....y siempre con datos ficticios, intenta adjuntar los 2 archivos (cliente y Resumen) para poder probar en "real" el código.......

Un saludo,

Tese

[icabal]

Si, de lo que es la factura, que el numero de la misma, el nombre del cliente e importe lo pase a RESUMEN que en teoria es otro libro de excel. Los datos comienzan en la columna A a la altura de la fila 6. Mas o menos asi:

4

5 Nº Factura | Cliente | Importe

6 XXXXXX

Estoy checando ahora mismo que con End(xlUp).Row puedo encontrar la fila vacia.

- - - - - Mensaje combinado - - - - -

Creo que acabo de conseguirlo. Este es el codigo que tengo:

Workbooks("Resumen.xlsm").Activate

ultimofolio = Range("A600").End(xlUp).Row

ultimofolio = ultimofolio + 1

Cells(ultimofolio, 1).Select

c = Cells(ultimofolio - 1, 1).Value + 1

ActiveCell.Value = c

ultimocliente = Range("B600").End(xlUp).Row

ultimocliente = ultimocliente + 1

Cells(ultimocliente, 2).Select

ActiveCell.Value = "madre mia"

El numero de <<factura>> se genera !!!.... pero ahora no se como copiar los datos de la factura al resumen y claro, poner el numero <<de factura>> a la factura... jo ....

[tese1969]

Pero tu código, creo, lo que hace es trabajar sobre el fichero Resumen.xlsm.........cuando en realidad lo que necesitas es partir del fichero de cliente.......y pasar los datos necesarios a Resumen.......

Por lo que me ha parecido entrever, el número de factura sería 1 más del último que tengas en resumen, no?

Lo importante a la hora de estructurar el código es tener claro qué debe hacer.......y saber si partimos de una información u otra.........

Un saludo,

Tese

[icabal]

Mmm pues si... esta mal haberlo hecho asi? Lo debo cambiar de libro?

SI, la factura tendria que ser 1 mas a el ultimo de resumen. Podrias decirme como copiar de un libro a otro los datos. Pues como veras en el codigo este usa activecell. Como seria?

activecell.value= worksheets("Factura").range("C3") ?

:disillusionment:

[tese1969]

Buenas de nuevo.....

Las formas de incluir datos de una hoja a otra ó de un libro a otro son diversas.......

Yo personalmente, siempre que no sea muy engorroso, prefiero omitir "Copiar" y "Pegar"......de manera que me gusta más indicarle qué valores debe procesar y dónde colocar los mismos..........

Aunque vayas a usar datos de "Resumen", puedes lanzar el código desde "Factura".........y referirte a uno u otro según entiendas.......

Por cierto, veo que vas haciendo progresos por tí mismo, lo que me hace pensar que en breve estarás en el foro ayudando a otros.....:eagerness:

Mira a ver si quieres seguir investigando ó montamos un código (que sería bastante sencillo, por cierto.....jejeje.....para motivarte....)

Un saludo,

Tese

[icabal]

Gracias, es un placer contar con tu colaboracion. Sigo con ello y en cuanto lo resuelva lo comparto. Un saludo y te aseguro que esta espina no se quedara ahi.:tennis:

[tese1969]

Como tú veas y prefieras..........sabes que si necesitas una mano se te ofrecerá gustosa.......

Un saludo y suerte!!!.....:boxing:

Tese