Pasar datos y combinar celdas

[san1023]

Hola, necesitaría ayuda para pasar datos de una hoja a un listado en otra hoja y si es posible combinar unas celdas. La explicación está en la segunda hoja. No tiene porque ser como yo quiero, me valdría de cualquier otra forma. Llevo media tarde intentando encontrar una solución en el foro, porque creo que es algo muy útil y no me creo que nadie lo haya necesitado, pero no he encontrado nada que me vaya bien. Por favor si sois tan amables...

P.D. Ingreso los datos en la Hoja Presupuestos

prueba.xls

[Armando Montes]

Hola, tal vez te sirva este ejemplo:

FacturaSimple-2.xls

[Antoni]

Sin haber visto la respuesta de Armando, aquí te lo dejo, solo tienes que pulsar sobre la autoforma "PRESUPUESTO", y a ver que pasa.

prueba MA.xls

[san1023]

Olé!!! Macro Antonio, gracias gracias gracias. Pero que biennn, estoy súper contenta, es lo que necesito, es genial. Tema solucionadísimoo. Ahora sólo me falta que yo me lo estudie bien, bien, bien. Muchísimas gracias.

¿Puedo pedir una cosita más? Sería posible que los datos estuviesen en una tabla para poder ordenarlos por cliente o por importe o por nº de presupuesto?

Armando Montes, muchas gracias por tu respuesta. Me parece a mí que de lo que me has enviado podé aprovechar más de una cosita. A ver si poquito a poquito y con paciencia consigo aprender muuuchas cosas.

Me encanta excel y me encanta Visual Basic!!! Sigo con muchas ganas de aprender, lástima que tengo poco tiempo.

[Armando Montes]

La seccion para bordes puede quedar asi:

Sub Bordes()

Selection.Borders.Weight = xlMedium

End Sub[/CODE]

[san1023]

Gracias Armando, pero no entiendo "na". ¿eso para qué es?

[Armando Montes]

Aplica bordes a la seleccion sin especificar cada uno de ellos.

Equivale a Sub BordeGrueso...

[Antoni]

Me lo pienso este fin de semana. Si no te digo nada pon un recordatorio en esta misma consulta, porqué entre la edad, el whisky y el fútbol, igual se me olvida. :)

[Antoni]

La seccion para bordes puede quedar asi:

Sub Bordes()

Selection.Borders.Weight = xlMedium

End Sub[/CODE]

El problema es que lo hace para todas las celdas del rango y solo lo queremos para los bordes exteriores.

@[uSER=160957]san1023[/uSER]

Bueno, pues me he acordado.

Verás que hay una hoja nueva "[b]MAESTRO PRESUPUESTOS[/b]" donde se irán registrando los presupuestos.

Pulsa sobre [b]LISTADO [/b]en la hoja "[b]LISTADO PRESUPUESTOS[/b]" para obtener el listado de presupuestos formateado.

He añadido una columna nueva con el [b]Nº de Línea del Presupesto[/b] para que no tengas problemas a la hora de ordenar la tabla.

También he añadido la columna [b]Fecha[/b], porqué entiendo que tarde o temprano la vas a necesitar, si no, la ocultas.

.

prueba MA II.xls

[Armando Montes]

Hola, para bordes exteriores:

Sub Bordes()

Selection.BorderAround.Weight = xlMedium

End Sub[/CODE]

[Antoni]

Hola, para bordes exteriores:

Sub Bordes()

Selection.BorderAround.Weight = xlMedium

End Sub[/CODE]

Esta si está "chula".:)

.

[san1023]

Hola Macro Antonio, me parece que el archivo prueba MAII no va bien ¿no? Me coge el maestro presupuestos y lo pasa a la hoja listado, agrupa, pero sigue sin ordenar.

[Armando Montes]

Ja, ja, ja, me soprendio lo de "chula", en mi pueblo dicen "shulada".

[Antoni]

Hola Macro Antonio, me parece que el archivo prueba MAII no va bien ¿no? Me coge el maestro presupuestos y lo pasa a la hoja listado, agrupa, pero sigue sin ordenar.

Antes de pulsar sobre "LISTADO", ordena la hoja "MAESTRO PRESUPUESTOS" a tu conveniencia.

Te recuerdo tu petición:

¿ Sería posible que los datos estuviesen en una tabla para poder ordenarlos por cliente o por importe o por nº de presupuesto?

[san1023]

pero ¿cómo la ordeno? si no es una tabla. A mí al menos no se me abre como tabla.

Perdona mi insistencia pero me daría rabia tener lo que necesito y no poder utilizarlo por alguna tontería.

Gracias.

[Antoni]

Selecciona los datos que quieras ordenar, Ficha datos\Ordenar y filtrar\Ordenar, y configura la ordenación a tu gusto antes de confeccionar el resumen.