Columns.PreferredWidthType (Word)

Retorna ou define a unidade preferida de medida a ser usado para a largura das células especificadas, colunas ou tabela. Leitura/gravação WdPreferredWidthType. Os valores de retorno possíveis são wdPreferredWidthAuto - Seleciona automaticamente a unidade de medida a ser utilizada com base na seleção atual, wdPreferredWidthPercent - Mede a largura do item atual usando um percentual especificado, wdPreferredWidthPoints - Mede a largura do item atual usando um número de itens especificado.

With ActiveDocument.Tables(1).Columns 
 .PreferredWidthType = wdPreferredWidthPercent 
 .PreferredWidth = 50 
End With