[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