為什麼這篇word分割檔案vba鄉民發文收入到精華區：因為在word分割檔案vba這個討論話題中，有許多相關的文章在討論，這篇最有參考價值！作者newiwgp (..??)看板Office標題[問題]分割word，並以指定內容字串另存檔名時...
軟體:Word 2016
版本:2016
需求是將合併列印後的檔案，依指定字串分割後另存成對應字串的doc and txt
http://fyyang.blogspot.tw/2014/04/tools-word-vba.html
我有參考以上的網站，但使用上有遇到問題
1.此VBA是以word分節符號的位置，當成分割檔案的判定
但我使用在需要的word file時，會發生分割位置在奇怪的指定位置，而不是在分節點
請問是否word原始檔有什麼部份需要設定?
2.沒辦法抓到命名的字串，因我分合併內容是大量的文字檔，而非表格
此部份請教是否有對應的語法?
合併後的檔案內容格式如下:
=========
... (內容）
TITLE=A001 (A001為另存後希望的檔名，在固定的行數，TITLE=後的文字長度不定)
....(內容）
....(內容）
....(內容）
=========
----分節頁面----
=========
... (內容）
TITLE=A0000002 (A0000002為另存後希望的檔名，ITLE=後的文字長度不定)
....(內容）
....(內容）
....(內容）
=========
分節頁面
後續重復
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 50.225.62.90
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1518513744.A.5B3.html
→ soyoso: 問題2如在固定行的話， selection.goto 參數what以 02/13 18:49
→ soyoso: wdgotoline，which以 wdgotofirst，第二行的話count以2 02/13 18:50
→ soyoso: 取該行文字selection.endkey參數unit以wdline，extend以 02/13 18:51
→ soyoso: wdextend。以mid來取該範圍selection.range.text，位置開 02/13 18:52
→ soyoso: 始為7(title=)後1位，長度省略。最後以replace取代斷行符 02/13 18:53
→ soyoso: 號chr(13) 02/13 18:53
→ soyoso: 問題1應需檔案才會比較清楚分割的位置是什麼原因 02/13 18:54