移动Word的光标(100分)

  • 主题发起人 主题发起人 wingfly
  • 开始时间 开始时间
W

wingfly

Unregistered / Unconfirmed
GUEST, unregistred user!
如何控制程序,控制Word的输入光标到文章的最末尾,文章里有N个表格,N不确定。
以及图片和文字
 
Selection.HomeKey Unit:=wdStory
Selection.EndKey Unit:=wdStory
这是在word中录制的宏,翻译成delphi即可。
 
向word发送ctrl+end行不行。
//关注此题。
 
你录制一个宏,看看她的代码是怎么写的,然后稍稍改一下就好了
 
不行,录的时候很多东西是已知的,比如当前的坐标等
 
//将光标移到文档最后的:
procedure GotoDocEnd(WordApp: TWordApplication);
var
WdUnit, WdCount, wdExtend: OleVariant;
begin
WdUnit := wdScreen;
wdCount := 10;
wdExtend := EmptyParam;
while true do
if WordApp.Selection.MoveDown(WdUnit, wdCount, wdExtend) = 0 then break;
end;
 
接受答案了.
 
后退
顶部