La BSK

TALLERES => Talleres => Guías, manuales y consejos => Mensaje iniciado por: jupklass en 04 de Marzo de 2014, 08:37:55

Título: Cartas tamaño Magic con MS-Word
Publicado por: jupklass en 04 de Marzo de 2014, 08:37:55
Lo más fácil del mundo, sin necesidad de ser un manitas o tener algún software espefico.
El Microsoft word suele estar en todos lados

paso 1: Configurar los bordes de la página
(http://img2.uploadhouse.com/fileuploads/19088/190881928eecf912143f420db6380e82ed570057.jpg)
(http://img1.uploadhouse.com/fileuploads/19088/190881917e7553f1eada7114ee516db711f38626.jpg)

Paso 2: Centrar y pegar la imagen

(http://img0.uploadhouse.com/fileuploads/19088/1908819070c20539182bedb68dcc0bff33f25acf.jpg)
(http://img9.uploadhouse.com/fileuploads/19088/190881894a0d8cb938f29acd5108bcc6d2846278.jpg)

Paso 3: Ajustar el tamaño de la imagen

(http://img8.uploadhouse.com/fileuploads/19088/19088188d57187c28ff2e378b81bff6fdeac5dc4.jpg)
(http://img7.uploadhouse.com/fileuploads/19088/1908818796b4a2b4eaddc9aec6e305994824ec40.jpg)

Paso 4: Hacer esto para las 9 cartas que caben en 1 hoja

(http://img7.uploadhouse.com/fileuploads/19088/1908818796b4a2b4eaddc9aec6e305994824ec40.jpg)

Paso 5: Para hacer nuevas hojas recomiendo introducir un salto de página

Paso 6: Que quieres salvar en PDF?

(http://img6.uploadhouse.com/fileuploads/19088/190882068a213240775dccc86c101c1ee3bb59d5.jpg)
Título: Re:Cartas tamaño Magic con MS-Word
Publicado por: men en 10 de Junio de 2014, 15:51:27
Incluyo una macro de Word para automatizar los pasos 3 y 4 en el caso de que queramos dar formato a un gran número de cartas.
1. Configuramos los bordes tal y como se indica.
2. Insertamos (o arrastramos) todas las imagenes dentro del documento.
3. Ejecutamos la macro y a imprimir.

Citar
Sub RedimensionarCartas()

For i = 1 To ActiveDocument.InlineShapes.Count
    ActiveDocument.InlineShapes(i).Height = 250
    ActiveDocument.InlineShapes(i).Width = 179
Next

For i = 1 To ActiveDocument.Shapes.Count
    ActiveDocument.Shapes(i).Height = 250
    ActiveDocument.Shapes(i).Width = 179
Next

End Sub
Título: Re:Cartas tamaño Magic con MS-Word
Publicado por: jupklass en 11 de Junio de 2014, 08:45:28
Me gusta tu macro!