利用vba实现大批论文格式整理

word文档批量处理大师软件有把word文档批量转换为PDF格式的功能，推荐！另外，最新7.0版还具有批量执行vba宏代码的能力

1、设置字体，用以下代码：With Selection.Font.Bold = True.Name = "宋体".Size = 16End WithRange("P3").Select2、复制格式用下面代码：[b1].Select '复制B1格式粘贴到A列Selection.CopyRange("A:A").SelectSelection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, SkipBlanks:= _False, Transpose:=FalseApplication.CutCopyMode = False3、复制列宽用下面代码：For t = 1 To [a1].CurrentRegion.Columns.CountCells(1, t).ColumnWidth = .Cells(1, t).ColumnWidthNext t '复制所有有内容的列宽相同