Cuestión : Palabra de VBA

Hola, el

I quiere al ise VBA insertar una serie de tablas en una palabra doc. por tiempos de la “cuenta” dentro de un lazo. ¿Cómo la gama sería fijada de modo que dentro del lazo cada tabla siga el rpeceding? ¿

For 1 al myRange determinado del count
= a objDoc.Range (??? ) gama del
objDoc.Tables.Add: =myRange, NumRows: =3, NumColumns: =4
next
 class= del

Respuesta : Palabra de VBA

Usted necesita poner una marca de párrafo entre las tablas, o se combinarán juntos.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:

InsertTables secundario (objDoc como Word.Document)
    objTable dévil como Word.Table
    MyRange dévil como Word.Range
    T dévil como número entero
    
    Cuenta de Const = 5
    
    Fijar MyRange = objDoc.Range
    Para t = 1 a 5
        objTable determinado = objDoc.Tables.Add (MyRange, 3, 4)
        Fijar MyRange = objTable.Range
        wdCollapseEnd de MyRange.Collapse
        wdCharacter de MyRange.Move, 1
        MyRange.Text = vbCr
        wdCollapseEnd de MyRange.Collapse
        wdCharacter de MyRange.Move, 1
    T siguiente
Submarino del extremo
Otras soluciones  
 
programming4us programming4us