Vba全面修改Word段落属性有效代码

摘要： 下面的WAPP是事先定义的word文档工程变量。
以下代码为通过VBA代码修改Word段落的缩进、段落间距、行距、分页等。
//段落格式设定
WApp.Selection.ParagraphFormat.LeftIndent = ...

下面的WAPP是事先定义的word文档工程变量。

以下代码为通过VBA代码修改Word段落的缩进、段落间距、行距、分页等。

//段落格式设定

WApp.Selection.ParagraphFormat.LeftIndent = WApp.CentimetersToPoints(float.Parse("0"));//左缩进

WApp.Selection.ParagraphFormat.RightIndent = WApp.CentimetersToPoints(float.Parse("0"));//右缩进

WApp.Selection.ParagraphFormat.SpaceBefore =float.Parse("0");//段前间距

WApp.Selection.ParagraphFormat.SpaceBeforeAuto =0;//

WApp.Selection.ParagraphFormat.SpaceAfter = float.Parse("0");//段后间距

WApp.Selection.ParagraphFormat.SpaceAfterAuto = 0;//

WApp.Selection.ParagraphFormat.LineSpacingRule = Microsoft.Office.Interop.Word.WdLineSpacing.wdLineSpaceSingle;//单倍行距

WApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphJustify;//段落2端对齐

WApp.Selection.ParagraphFormat.WidowControl = 0;//孤行控制

WApp.Selection.ParagraphFormat.KeepWithNext = 0;//与下段同页

WApp.Selection.ParagraphFormat.KeepTogether = 0;//段中不分页

WApp.Selection.ParagraphFormat.PageBreakBefore = 0;//段前分页

WApp.Selection.ParagraphFormat.NoLineNumber = 0;//取消行号

VBA批量替换多个WORD文档中的内容

VBA批量替换多个WORD文档中的内容 要想一下子就替换掉很多个WORD文档中的内容，我们得使用VBA的办法才能实现，下面是方法，请过目。 一、前期准备 下面是具体操作步骤。 A，首先将需要批量替换的多个Word文档放在同一文件夹下面。 B，新建一空白Word文档，右击空白工具栏，单击“控件工具箱”，就可以看到屏幕上调出的控件工具箱。 C，在控件工具箱上单击“命令按钮”，文档中就放置了一个按钮了。 D，双击该按钮，进入VB代码编写模式，将以下代码复制进去。 二、命令按钮的代码 Private Sub Co

WApp.Selection.ParagraphFormat.Hyphenation = 1;//取消段字

WApp.Selection.ParagraphFormat.FirstLineIndent = WApp.CentimetersToPoints(float.Parse("0"));//首行缩进

WApp.Selection.ParagraphFormat.OutlineLevel = Microsoft.Office.Interop.Word.WdOutlineLevel.wdOutlineLevelBodyText;

WApp.Selection.ParagraphFormat.CharacterUnitLeftIndent = float.Parse("0");

WApp.Selection.ParagraphFormat.CharacterUnitRightIndent = float.Parse("0");

WApp.Selection.ParagraphFormat.CharacterUnitFirstLineIndent = float.Parse("0");

WApp.Selection.ParagraphFormat.LineUnitBefore = float.Parse("0");

WApp.Selection.ParagraphFormat.LineUnitAfter = float.Parse("0");

WApp.Selection.ParagraphFormat.AutoAdjustRightIndent = 1;

WApp.Selection.ParagraphFormat.DisableLineHeightGrid =0;

WApp.Selection.ParagraphFormat.FarEastLineBreakControl =1;

WApp.Selection.ParagraphFormat.WordWrap = 1;

WApp.Selection.ParagraphFormat.HangingPunctuation = 1;

WApp.Selection.ParagraphFormat.HalfWidthPunctuationOnTopOfLine = 0;

WApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndAlpha = 1;

WApp.Selection.ParagraphFormat.AddSpaceBetweenFarEastAndDigit = 1;

WApp.Selection.ParagraphFormat.BaseLineAlignment = Microsoft.Office.Interop.Word.WdBaselineAlignment.wdBaselineAlignAuto;

Word脚注和尾注

Word脚注和尾注 Word脚注和尾注的组成 脚注或尾注由两个互相链接的部分组成：注释引用标记和与其对应的注释文本。在注释中可以使用任意长度的文本，并像处理任意其他文本一样设置注释文本格式。您可以自定义注释分隔符，即用来分隔文档正文和注释文本的线条。 Word脚注和尾注的作用 脚注和尾注用于在打印文档中为文档中的文本提供解释、批注以及相关的参考资料。可用脚注对文档内容进行注释说明，而用尾注说明引用的文献。当您编写需要引用一些相关资料的文档时，可以通过使用脚注在页面底部添加注释，或者使用尾注在文档结尾处添加