一、二、三级标题的段落缩进调整为0，宏如何写。
Sub 调整标题缩进1() Dim p As Paragraph '参考文献4个字设置为1级标题 For Each p In ActiveDocument.Paragraphs If p.Style = "正文" Then p.CharacterUnitFirstLineIndent = 2 If p.Style = -2 Then p.CharacterUnitFirstLineIndent = 0 If p.Style = -2 Then p.FirstLineIndent = CentimetersToPoints(0) If p.Style = -2 Then p.CharacterUnitLeftIndent = 0 Next End Sub 一、二、三级标题的段落缩进调整为0，宏如何写。 但以上的正文调为2可行，不理解。
用： If p.Style = "标题 1" Then p.CharacterUnitFirstLineIndent = 0 可以实现。 但问题在于：你的附件中的标题并不是"标题 1"，而是"标题 1 + 11 磅， 蓝色，......"， 在 p.Style 属性中是有区别的！！ 不信，可以用以下方法验证： 你把这行，用“样式”工具，更改为"标题 1"(注意：不要改字体、颜色、增加缩进...等） 运行 If p.Style = "标题 1" Then p.CharacterUnitFirstLineIndent = 10 马上看到效果：该行缩进10，说明在 p.Style 属性中是有区别的。也就是说，你要选取正确的属性来进行 if。
答：Sub 前123级标题() '测试结果 1 代码重复运行1次才能调整好。 Selection.HomeKey wdStory '光标移到最前面。 Dim p ...详情>>
问：怎样用Camtasia Studio v2.0.3来制作媒体
答：这个软件有使用向导的，你新建一个文件，然后照着他的说明一步一步的走下去，就知道怎么用了，这个软件太小了，网上跟本找不到教程的，如果你确实还是不会的话，找个懂电脑...详情>>
