Vraag : Macro om kolommen in de lijsten van Word samen te voegen

Dank u want uw help.

I kolommen zou willen samenvoegen, maar niet rijen in diverse lijsten die ik in Microsoft Word heb geproduceerd.  Ik ben benieuwd of kan iedereen me van een macro voorzien die dit zal verwezenlijken.  Ik moet verschillende kolommen afhankelijk van lijst samenvoegen.  Plus, wil ik niet de kolommen in de eerste rij van de lijst (titelbar) samenvoegen.  Het zou ideaal zijn om een macro te hebben die enkel zou samenvoegen (over kolommen) de cellen ik selected. heb

Antwoord : Macro om kolommen in de lijsten van Word samen te voegen

Deze macro wordt ontworpen om dat te doen
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

Sub MergeSelectedCells ()
    Schemerige tbl als Lijst
    Schemerige rng als Waaier
    Schemerige lCol als Geheel
    Schemerige tRow als Geheel
    Schemerige rCol als Geheel
    Schemerige bRow als Geheel
    Schemerig r als Geheel
    
    Reeks tbl = Selection.Range.Tables (1)
    tRow = Selection.Cells (1) .RowIndex
    bRow = Selection.Cells (Selection.Cells.Count) .RowIndex
    lCol = Selection.Cells (1) .ColumnIndex
    rCol = Selection.Cells (Selection.Cells.Count) .ColumnIndex
    Voor r = tRow aan bRow
        Reeks rng = tbl. Cel (r, lCol). Waaier
        rng. Eind = tbl. Cel (r, rCol). Range.End
        rng. Cells.Merge
    Volgende r
Andere oplossingen  
 
programming4us programming4us