word中表格根据窗口可以自动调整表格，希望自动调整行高

wcm_xp

word中表格根据窗口可以自动调整表格，主要是列适应了，不超页面。 求助表格行自动调整一页.rar (17.09 KB, 下载次数: 5)

2017-10-13 15:44 上传

点击文件名下载附件

'根据窗口调整表格
      Sub 表格处理()
        Dim t As Table
        ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
        For Each t In ActiveDocument.Tables
           t.AutoFitBehavior (wdAutoFitWindow)
          ？？？？？
          ？？？？？
        Next
     End Sub
可是表格是一个整体的，想行高也充满一页。如何做啊？请老师指导。见附件（第一页手动拉最后表格线，平均【分布行】做的，后面有很多很多类似表需要每次手动拉就不方便了。希望老师帮助VBA。我基本不会超一页的，主要内容控制在0.64高度，不是最小值）

wcm_xp

请老师出手相救。就是word排版印刷稿的要求。我用过行数统计，记录数得到值。可是“名称”列是需要换行的，行数与行高就不成比例了。。。不知道可有快捷方式实现一个表格行自适应版面？

wcm_xp

学习守柔老师的《守柔WORD编程代码集.pdf》还是没有耐力悟出解决之道。