Sub 自动调整所有表格() ' ' 自动调整所有表格 宏 ' 'Application.Browser.Target = wdBrowseTable For i = 1 To ActiveDocument.Tables.Count With ActiveDocument.Tables(i) .AutoFitBehavior (wdAutoFitWindow) '根据窗口调整内容 .Range.ParagraphFormat.Alignment = wdAlignParagraphCenter
//////////////////////// // Prepare store //////////////////////// // prepare fields and columns var __fields = []; var __columns = []; for (var jj=0; jj<config.columns.length; jj++) { var item2 = {}; var item = []; // for fields item.name = config.c