[VBA ] word VBA range結尾問題

作者: gary8520 (元丁)   2015-12-04 00:26:52
由於有些重覆的文件歸檔動作,要從excel呼叫word,才剛學習word VBA
想請教大大們:
在一個新文件上輸入:Aaa bbc中文字( 金額 1,000 )
^ ^ ^ ^
^的部份是半型空格
目的是希望能選到某個特定字元到某個特定字元的範圍
例如目前想要選到「中文字」這個範圍
VBA code如下
Dim aRange As Range
Set aRange = ActiveDocument.Sections(1).Range
aRange.MoveStartUntil "中"
aRange.MoveEndWhile "(", wdBackward
MsgBox (aRange.Text)
出來顯示是「中文字( 金額 1,000 )」
我嘗試換過MoveEndUntil,但結果卻完全相同
另外想要問,有沒有手段是可以將Range.End設定到某個詞(ex"罰款")之前?
作者: potawei (我要13億)   2015-12-04 12:58:00
取"中"字之後一整段,取"罰款"之後一整段,前面減掉後面?
作者: MOONRAKER (㊣牛鶴鰻毛人)   2015-12-04 13:12:00
range最小就是一格 格內的內容當字串處理instr()在字串中尋找子字串位置 mid()裁剪字串
作者: gary8520 (元丁)   2015-12-04 21:22:00
是range無法設定頭又設定尾嗎?
作者: MOONRAKER (㊣牛鶴鰻毛人)   2015-12-05 00:10:00
range最小就是一格(cell) 再講下去跟前面一樣
作者: gary8520 (元丁)   2015-12-09 01:51:00
word vba range最小不是一個字元嗎?

Links booklink

Contact Us: admin [ a t ] ucptt.com