Question

VBA execl如何控制Word的光标移动到其它位置，求各位大神指点下。

我在网上看到有Selection .MoveDown unit:=wdLine, Count:=1 .和Selection .HomeKey unit:=wdLine这种形式的光标移动方法，但我执行程序的时候都不起作用，只有输入类指令起作用，如Selection .TypeText Text:="2"，Selection.TypeBackspace，想问下原因，WORD文件对象也建立并且激活了，我用的是03版Execl。实在不行给我段能转移光标的可执行程序（03版能用的）也可以，谢谢！

Answer 1

自己使用“录制宏”命令来录制一个宏，并学习一下宏代码即可

追问

Word中的宏语句不是所有都能在EXECL中的宏应用的，谢谢。

Answer 2

Word的光标移动到其它位置，其它位置是什么位置？

追问

换下一行，或者向左右移动几个字符的位置

追答

Selection.MoveDown Unit:=wdLine, Count:=1 这个表示光标下移一行，这个肯定有用的，为什么你说没有用呢？当然了，此代码必须要求你那个Selection不能为nothing，也就是你必须先选中某个字符才能把光标向下转移，如果你啥都不选中，只是一个光标在文档当中，这样的话运行代码当然没有反应

追问

我打开WORD文档激活后光标不是在第一页第一行的首位置吗？还是需要用其它语句定义其在首位置？而且光标移动后输入类指令都可以执行（注：我是用EXECL的VB编的不是WORD的，只是操作针对对象是WORD文件）

追答

如果是用excel当中的VBA操作word，那你那个Selection必须带上的word文件的application，如果不带指定，默认的是excel当中的Selection,因为excel也有Selection对象，比如以下代码：
Sub rest()
Dim wd As Object
Set wd = CreateObject("word.application")
wd.documents.Open (ThisWorkbook.Path & "\123.doc")
wd.Selection.EndKey '//前面wd.一定不能少，否则会被认为是excel的Selection
End Sub