{"id":92581,"date":"2020-03-13T20:42:39","date_gmt":"2020-03-13T12:42:39","guid":{"rendered":"http:\/\/4563.org\/?p=92581"},"modified":"2020-03-13T20:42:39","modified_gmt":"2020-03-13T12:42:39","slug":"%e6%b1%82-vba-%e7%9a%84%e6%93%8d%e4%bd%9c%e5%ae%9e%e4%be%8b%e9%9b%86-word-%e7%9a%84","status":"publish","type":"post","link":"http:\/\/4563.org\/?p=92581","title":{"rendered":"\u6c42 VBA \u7684\u64cd\u4f5c\u5b9e\u4f8b\u96c6 word \u7684"},"content":{"rendered":"
\n
\n
\n

\u6c42 VBA \u7684\u64cd\u4f5c\u5b9e\u4f8b\u96c6 word \u7684 <\/h1>\n

<\/p>\n

\n
\u8cc7\u6df1\u5927\u4f6c : hongxii <\/span> <\/i> 47<\/span> <\/div>\n
<\/div>\n<\/p><\/div>\n<\/p><\/div>\n<\/p><\/div>\n
<\/p>\n

\u5982\u9898 \u611f\u8c22\u5404\u4f4d \u60f3\u628a\u626b\u51fa\u6765\u7684\u6587\u6863\u7efc\u5408\u6574\u7406\u4e00\u4e0b\u683c\u5f0f \u5bf9 VBA \u4e0d\u662f\u90a3\u4e48\u719f\u6089 \u76ee\u524d\u60f3\u8981\u663e\u793a\u6bcf\u6bb5\u7684\u6587\u672c \u4f46\u8fd8\u662f\u5931\u8d25\u4e86 \u4ee5\u4e0b\u5185\u5bb9\u8fd0\u884c\u53d1\u73b0 P \u7684\u4e2a\u6570\u53ea\u6709 1 \u4f46\u662f\u5b9e\u9645\u4e0a\u6709 10 \u6765\u6bb5\u624d\u5bf9 MsgBox \u7684\u7ed3\u679c\u4e5f\u662f\u7a7a\u767d \u6240\u4ee5\u6c42\u4e2a word \u7684 VBA \u64cd\u4f5c\u5b9e\u4f8b\u96c6\u5408 \u597d\u7167\u732b\u753b\u864e \u6216\u8005\u6c42\u76f8\u5173\u7f51\u7ad9\u4ecb\u7ecd MSDN \u7684 vba \u9875\u9762\u5730\u5740\u5df2\u6709 \u4f46\u662f\u90fd\u6ca1\u6709\u76f8\u5173\u7684\u5b9e\u4f8b \u5927\u6d77\u635e\u9488<\/p>\n

Sub FindTheWord()   '\u663e\u793a\u6240\u6709\u6bb5\u843d\u7684\u5185\u5bb9   Dim p As Paragraph, s As String, page As Long   page = 0   For Each p In ThisDocument.Paragraphs     page = page + 1     s = p.Range.Words(1).Texts     MsgBox (s)   Next   MsgBox (\"\u6bb5\u843d\u6570\" & page) End Sub <\/code><\/pre>\n<\/p><\/div>\n
 \u5927\u4f6c\u6709\u8a71\u8aaa<\/b> (9<\/span>)        <\/div>\n
 <\/div>\n<\/p><\/div>\n<\/p><\/div>\n
    \n
  • \n
    \n
    \n
     \u4e3b<\/span> \u8cc7\u6df1\u5927\u4f6c : hongxii <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 \u597d\u5427 \u521a\u521a\u628a ThisDocument \u7684\u6362\u6210\u4e86 ActiveDocument
    \u5c31\u6210\u529f\u663e\u793a\u4e86<\/p>\n
    \u5bb3 \u6211\u5b9e\u5728\u662f\u592a\u83dc\u4e86
    \u8fd8\u662f\u6c42\u5404\u79cd word \u7684 vba \u64cd\u4f5c\u5b9e\u4f8b\u96c6\u5408 \u8c22\u8c22\u8001\u54e5\u4eec                                                            <\/div>\n<\/p><\/div>\n<\/li>\n
  • \n
    \n
    \n
     \u8cc7\u6df1\u5927\u4f6c : depress <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 \u5fae\u8f6f\u5b98\u65b9\uff1a https:\/\/docs.microsoft.com\/zh-cn\/office\/vba\/api\/overview\/word<\/p>\n
    \u4e00\u4e2a\u535a\u5ba2\uff1a http:\/\/www.exceloffice.net\/archives\/category\/vba\/word-vba<\/p>\n
    vba \u8fd9\u79cd\u4e1c\u897f\uff0c\u9700\u8981\u5b9e\u73b0\u4ec0\u4e48\u5c31\u641c\u4ec0\u4e48\uff0c\u63d0\u524d\u5b66\u6ca1\u5565\u7528                                                            <\/p><\/div>\n<\/p><\/div>\n<\/li>\n
  • \n
    \n
    \n
     \u8cc7\u6df1\u5927\u4f6c : loading <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 vba \u8fd9\u4e48\u7b80\u5355\uff0c\u770b\u7740\u8bed\u6cd5\u5199\u5c31\u884c\u4e86\u3002                                                            <\/div>\n<\/p><\/div>\n<\/li>\n
  • \n
    \n
    \n
     \u8cc7\u6df1\u5927\u4f6c : forgottencoast <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 \u8fd9\u4e0d\u662f vba \u7684\u95ee\u9898\uff0c\u8fd9\u662f Word api \u7684\u95ee\u9898\u3002                                                            <\/div>\n<\/p><\/div>\n<\/li>\n
  • \n
    \n
    \n
     \u4e3b<\/span> \u8cc7\u6df1\u5927\u4f6c : hongxii <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 \u8001\u54e5\u8bf4\u7684\u662f \u786e\u5b9e\u662f\u8fd9\u6837                                                            <\/div>\n<\/p><\/div>\n<\/li>\n
  • \n
    \n
    \n
     \u4e3b<\/span> \u8cc7\u6df1\u5927\u4f6c : hongxii <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 @loading \u8bdd\u662f\u8fd9\u4e48\u8bf4 \u6709\u4e2a\u5b9e\u4f8b\u5e72\u8d77\u6765\u6548\u7387\u603b\u80fd\u63d0\u5347\u5f88\u591a \u603b\u6bd4\u5728\u90a3\u8fb9\u6b7b\u6263\u6587\u6863\u5f3a                                                            <\/div>\n<\/p><\/div>\n<\/li>\n
  • \n
    \n
    \n
     \u4e3b<\/span> \u8cc7\u6df1\u5927\u4f6c : hongxii <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 @depress \u611f\u8c22                                                            <\/div>\n<\/p><\/div>\n<\/li>\n
  • \n
    \n
    \n
     \u4e3b<\/span> \u8cc7\u6df1\u5927\u4f6c : hongxii <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 @forgottencoast \u8001\u54e5\u8bf4\u7684\u662f \u5c31\u662f api \u6709\u4e2a\u5b9e\u4f8b\u7684\u8bdd\u5206\u5206\u949f\u4e8b\u513f\u5c31\u5b8c\u4e86 \u548b\u4e5f\u7528\u4e0d\u7740\u7cfb\u7edf\u6027\u7684\u5168\u90e8\u5b66\u5b8c\u4e0d\u662f                                                            <\/div>\n<\/p><\/div>\n<\/li>\n
  • \n
    \n
    \n
     \u4e3b<\/span> \u8cc7\u6df1\u5927\u4f6c : hongxii <\/span>  <\/div>\n
     <\/i>            <\/span> <\/div>\n<\/p><\/div>\n
                                                                 @depress \u8001\u54e5\u7b2c\u4e8c\u4e2a\u7f51\u5740\u68d2\u68d2\u54d2\uff01\uff01\uff01                                                            <\/div>\n<\/p><\/div>\n<\/li>\n
  • \n","protected":false},"excerpt":{"rendered":"
    \u6c42 VBA \u7684\u64cd\u4f5c\u5b9e\u4f8b\u96c6 word…<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[],"tags":[],"_links":{"self":[{"href":"http:\/\/4563.org\/index.php?rest_route=\/wp\/v2\/posts\/92581"}],"collection":[{"href":"http:\/\/4563.org\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/4563.org\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/4563.org\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/4563.org\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=92581"}],"version-history":[{"count":0,"href":"http:\/\/4563.org\/index.php?rest_route=\/wp\/v2\/posts\/92581\/revisions"}],"wp:attachment":[{"href":"http:\/\/4563.org\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=92581"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/4563.org\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=92581"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/4563.org\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=92581"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}