请教一个关于Word VBA的问题

efaneda 2003-08-24 07:50:51
假设文本里有这么两行,它们是连在一起的
123456
abcd

现需要查找含有"123"的行和含有"ab"的行,将该两行调换成

abcd
123456

请问如何在word里如何实现,请把vba代码贴一下,谢谢~~
...全文
21 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
chovie 2003-08-30
  • 打赏
  • 举报
回复
以前我写过类似的东西,代码找不到了。大致方法如下:
1。定义wrod的doucument对象并打开word文档
2。定义一个word.selection对象
3。设置doucument对象的find="abcd"并执行find对象的excute方法找到"abcd"并将其赋给(2。)中定义的对象
4。将该找到的selection对象=""(空串)
5。同样方法找到"1234"对象,将前面保存的赋给找到"1234"的对象。
OK

5,138

社区成员

发帖
与我相关
我的任务
社区描述
其他开发语言 Office开发/ VBA
社区管理员
  • Office开发/ VBA社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧