★★★★★如何设置Word表格的列宽?★★★★★

Question

在你的应用程序里应该引用了Word对象了吧。
如果引用了，那么可以这样设置：
ActiveDocument.Tables[1].Columns.Width =10;

Answer 1

试试这一段代码：
    Selection.SelectColumn     '选定一列
    Selection.Columns.PreferredWidthType = wdPreferredWidthPoints
    '设定表格的当前列的宽度
    Selection.Columns.PreferredWidth = CentimetersToPoints(4.3)        Selection.Move Unit:=wdColumn, Count:=1
    Selection.SelectColumn     '选定表格的下一列
    Selection.Columns.PreferredWidthType = wdPreferredWidthPoints
    Selection.Columns.PreferredWidth = CentimetersToPoints(4.1)
    Selection.Move Unit:=wdColumn, Count:=1
    Selection.SelectColumn     '再次选定下一列
    Selection.Columns.PreferredWidthType = wdPreferredWidthPoints
    Selection.Columns.PreferredWidth = CentimetersToPoints(3.7)
    Selection.Move Unit:=wdColumn, Count:=1
这个例子中要保证当前的指针在单元格内部时才可以的

Answer 2

怎么songboemail(宋波)的代码我一点都看不懂啊？？？