vba word如何提取当前段落某个字符前的字符
鼠标选中这一段任意地方。段落里包括中文的顿号“、”,想提取这个段落里顿号前的字符,怎么实现?谢谢!一段里只有一个顿号,或者只遇到第一个顿号就可以提取第一个顿号前的字符,后...
鼠标选中这一段任意地方。段落里包括中文的顿号“、”,想提取这个段落里顿号前的字符,怎么实现?谢谢!
一段里只有一个顿号,或者只遇到第一个顿号就可以提取第一个顿号前的字符,后面的顿号不用管 展开
一段里只有一个顿号,或者只遇到第一个顿号就可以提取第一个顿号前的字符,后面的顿号不用管 展开
1个回答
展开全部
可以用下面的代码来实现:
Sub mytest()
Selection.MoveDown unit:=wdParagraph
Selection.MoveUp unit:=wdParagraph, Extend:=wdExtend
utxt = Selection.Range.Text
upos = InStr(utxt, "、")
If upos > 0 Then
ut = Left(utxt, upos - 1)
MsgBox ut '这里就是要提取的内容
Else
MsgBox "没有找到顿号!!!"
End If
End Sub
Sub mytest()
Selection.MoveDown unit:=wdParagraph
Selection.MoveUp unit:=wdParagraph, Extend:=wdExtend
utxt = Selection.Range.Text
upos = InStr(utxt, "、")
If upos > 0 Then
ut = Left(utxt, upos - 1)
MsgBox ut '这里就是要提取的内容
Else
MsgBox "没有找到顿号!!!"
End If
End Sub
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |