经测试发现只可以复制一些文字,如果有图片和表格能不能一块复制呢?
xpban2006 发表于 2010-6-26 09:38  #include <Word.au3>
$oWordApp = _WordCreate ()
$oDoc = _WordDocOpen ($oWordApp, @ScriptDir & "\Test.doc")
$first=0;
$last=$oDoc.Characters.Count;
$oDoc.Range($first,$last).Select();
;$oDoc.Range($first,$last).Cut();
$oDoc.Range($first,$last).copy();
MsgBox(0,0,'已经拷贝到剪贴板')
_WordQuit ($oWordApp)
$oWordApp = _WordCreate ()
MsgBox(0,0,'试试粘贴看是不是图片也可以读取到剪贴板了?')
参考:http://cache.baidu.com/c?m=9d78d ... 1b5d&user=baidu |