Forum Discussion

Jorge_Forero's avatar
Jorge_Forero
Copper Contributor
Jun 15, 2020

Conversión Excel a Documento Word : Office 2016

Buenos días grupo, Solicito su ayuda con lo siguiente:

 

Tengo un texto copiado de Word a Excel. Al pegarlo, lo hace en la columna A y cuando hay cambio de párrafo aparecen filas vacías.

El documento tiene títulos de capítulos y sub capítulos que Excel los ubica en filas independientes. Los capítulos van numerados 1., 2., 3., …. N. y los sub capítulos igual, pero siempre debajo de los capítulos Ejemplo

 

Columna A, Fila n (dependiendo hasta donde lleguen los textos

1.    Capítulo 1 (por ejemplo este capítulo no tiene sub capítulos)

Texto o párrafo del capitulo 1

2.    Capítulo 2 (por ejemplo este capítulo si tiene sub capítulos)

Texto o párrafo del capítulo 2

1.    1. Sub capítulo 1 del capítulo 2

Texto o párrafo del capítulo 2 sub capítulo 1

2.    2. Sub capítulo 2 del capítulo 2

Texto o párrafo del capítulo 2 sub capítulo 2

2.  3. Sub capítulo 3 del capítulo 2

Texto o párrafo del capítulo 2 sub capítulo 2

 

3.    3. Capítulo 3

Así sucesivamente

 

La idea es que al dar click en el botón btnConvertir me abra el archivo de Word EnviarDocumento (que está guardado en la misma ubicación del archivo Excel y tiene encabezado con el logo y pié de página con la dirección y teléfonos) y pegue el texto con las siguientes características:

-. Todo el texto debe tener la fuente Humanst521 Lt BT Light, tamaño 12

-. Los capítulos tengan la viñeta en número romano, centrado y en negrilla

-. Para los sub capítulos, la viñeta en arábigo alineado a la izquierda.

Con ejemplo mostrado arriba, quedaría así:

I.              Capítulo 1 (por ejemplo este capítulo no tiene sub capítulos) (Negrilla Centrado)

Texto o párrafo del capitulo 1

II.             Capítulo 2 (por ejemplo este capítulo si tiene sub capítulos) (Negrilla Centrado)

Texto o párrafo del capítulo 2

2.1.  Sub capítulo 1 del capítulo 2

Texto o párrafo del capítulo 2 sub capítulo 1

2.2.  Sub capítulo 2 del capítulo 2

Texto o párrafo del capítulo 2 sub capítulo 2

2.3.  Sub capítulo 3 del capítulo 2

Texto o párrafo del capítulo 2 sub capítulo 2

III.              Capítulo 3 (Negrilla Centrado)

 

-. Luego salvar el archivo de Word con el nombre Definitivo abogados con un número consecutivo Definitivo Abogados 1, el siguiente que se ejecute Definitivo Abogados 2, así sucesivamente, en la ubicación donde se encuentra el archivo de Excel.

2 Replies

  • mathetes's avatar
    mathetes
    Gold Contributor

    Jorge_Forero 

     

    I'm sorry, but it really sounds like you're trying to do something here that Excel really isn't meant for. But definitely without seeing the spreadsheet that you're describing, there is not much that can be said in the way of help.

     

    But WHY are you doing this in Excel in the first place?

    • Jorge_Forero's avatar
      Jorge_Forero
      Copper Contributor

      Hi mathetes 

      gracias por tu tiempo y responder, pues la idea de hacerlo en Excel, obedece a que al pegar el documento en Excel, este lo separa en filas.. entonces pienso que una macro en un botón que pueda recorrer las filas y cuando encuentre los títulos y/o los subtítulos realice los cambios que necesito.

       

      no se si sea más sencillo hacer una macro en Word, pero ni en Excel ni en Word, se como hacerlo.

      te comparto los archivos en Excel y Word y agradezco tu valiosa colaboración.

      Jorgef.