Modificare la larghezza di una tabella cella unita in VBA (Word 2010)

Question

In MS Word 2010, modificando la larghezza di una cella unita è un po 'furbata.

Immaginate una semplice tabella 2 x 2. Le celle della fila superiore vengono unite, le celle della seconda fila non sono.

Se il cursore posto in cella (2, 1) (utilizzando gli indici di parola) e la larghezza viene modificata, la larghezza della fila superiore verrà modificata per adattarla a quella della cella "attiva".

Se, invece, la selezione viene esteso per includere la "Fine Row" personaggio nascosto, quindi modificare riguarda solo la cella selezionata, come previsto.

Qualcuno sa come replicare questo comportamento in VBA?

Saluti

Dan

Answer 1

Si scopre che se l'utente Cell.Select poi il comportamento è come volevo

With Selection.Table(1)
    .Cell(1, 1).Select
    .Selection.Cells.Width = MillimetersToPoints(150)
    .Cell(2, 1).Select
    .Selection.Cells.Width = MillimetersToPoints(150)
    .Cell(3, 1).Select
    .Selection.Cells.Width = MillimetersToPoints(50)
    .Cell(3, 2).Select
    .Selection.Cells.Width = MillimetersToPoints(100)
End With