以居中的段首不缩进2字符，而其它的段首则缩进2字符

13907933959

怎样让以居中的文字段首不缩进2字符，而其它文字的段首则缩进2字符

求前辈们帮忙！谢谢！

jiminyanyan

Sub jimin()
    Dim i As Paragraph
    For Each i In ActiveDocument.Paragraphs
        If i.Range.ParagraphFormat.Alignment = wdAlignParagraphCenter Then
            MsgBox i.Range.Text
        End If
    Next
End Sub
居中的代码给你一下…………。

13907933959

jiminyanyan 发表于 2017-9-1 21:01
Sub jimin()
    Dim i As Paragraph
    For Each i In ActiveDocument.Paragraphs

前辈好！
感谢您提供的这个代码！但还不能满足我的需求，能否再给一个能直接把文档内其它文字的段首缩进2字符，以居中的文字段首则不缩进2字符的代码？谢谢！

13907933959

这个问题以得到了（duquancai）杜前辈的完美解答！
详见下面的网址10楼。
http://club.excelhome.net/thread-1366704-1-1.html

jiminyanyan

13907933959 发表于 2017-9-3 10:40
这个问题以得到了杜前辈（duquancai）的完美解答！
详见下面的网址10楼。
http://club.excelhome.net/thr ...

从你开始学VBA，应有一年多了吧，都高级了，我怎么感觉你的动手能力还是很差的…问题解决后应对代码做个研究，下次遇上类似的，就会了……哈，话说回来，学医比学VBA有前途。

duquancai

jiminyanyan 发表于 2017-9-3 14:42
从你开始学VBA，应有一年多了吧，都高级了，我怎么感觉你的动手能力还是很差的…问题解决后应对代码做个 ...

其实我开始学VBA也只有一年多一点吧！主要是看知识的沉淀，学功科和理科的人占有先手，更重要是要浓厚兴趣！

13907933959

jiminyanyan 发表于 2017-9-3 14:42
从你开始学VBA，应有一年多了吧，都高级了，我怎么感觉你的动手能力还是很差的…问题解决后应对代码做个 ...

前辈好！

是啊，让前辈见笑了，按时间算接触 VBA 断断续续都快 3 年了，这个“高级”真是有名无实，实在是惭愧！好在它只是注册会员时间的早晚，不代表水平的高低，由于生长在山沟里读书很少，天生又比较愚笨，现代化的东西更是见识得少，也没学过英语，汉语拼音…等，电脑我也是2014年上半年才刚接触，到现在除了26个大小写的英文字母免强认得外，一句英语也不会，连打字都不会（只能用手写板），对 VBA 更是零基础，论坛上的代码绝大多数又没有中文注释，网上能查到的代码中文注释相当有限，对我来说象看“天书”一样难懂，再加上学中医，要看、要记的东西特别多，学其它东西的时间就显得不够，所以学 VBA 对我来说，如水中捞月，相当艰难，如今对简单的 VBA 我也只是处在免强会用的阶段，如这几天学的东西，过几天被中医的东西一冲，又忘得一干而净，再一个又不能老被我的中医师傅看到，毕竟这个不是我谋生的东西，晚上又没时间学，要学和背中医的东西，只能是白天在医院无事无病人的时候偶尔到论坛上看一下，唉！十天打鱼九天晒网！所以年年的“老油条”原地踏步，好在遇到问题总有您 和 duquancai 、413191246se ……等的前辈援手相助，在下深深感激！

13907933959

duquancai 发表于 2017-9-3 15:28
其实我开始学VBA也只有一年多一点吧！主要是看知识的沉淀，学功科和理科的人占有先手，更重要是要浓厚兴 ...

杜前辈说得对！学东西时间的长短不是唯一的因素，兴趣、天赋和知识程度才是学东西的关键，我真羡慕您的 VBA 水平，以经到了高不可攀的高度！唉！象我也只能是“弱水三千、只取一瓢饮”！