word中绝对居中的宏代码

所谓“绝对居中”是学研端定义的一个表达，是为了区别于有些居中以后由于首行缩进或者其他原因而导致的实质不居中。虽然这个直接操作不过两步：1 选中对象后清除格式（快捷键是ctrl+shift+n） 2 居中（快捷键是ctrl+e），但为了追求更简便，学研端给出了包括这两步的宏代码。使用这段宏代码以后，直接将改命令放置到word（2007版以上）顶部的“快速访问工具栏”。（为了方便辨别，可以为其选择一个特别的图标，这个可以自行修改。）

下面是宏代码

Sub 绝对居中()'' 绝对居中 宏'' Selection.Range.Style = ActiveDocument.Styles(wdStyleNormal) Selection.ParagraphFormat.Alignment = wdAlignParagraphCenterEnd Sub