想从一个文档中复制东西到另一个文档,于是用了Range.Copy(),然后再用PasteAndFormat(WdRecoveryType.wdFormatOriginalFormatting)黏贴到相应位置,可是为什么有时候执行的时候可行,有的时候则会提示
此方法或属性无效,因为 剪贴板是空的或无效的
为什么呢??
难道是我RP太差了??
此方法或属性无效,因为 剪贴板是空的或无效的
为什么呢??
难道是我RP太差了??
解决方案 »
- 小弟初学者,有个疑问。。还望指点。。
- 关于集合的问题?
- textbox 怎么感知内容的变化
- subsonic 如何使用 动态连接字符串?
- 如何使用AD得到用户的其它信息(超急!!!!!!!!!!!!)
- 第一次要用水晶报表,问几个问题,希望高手点拨一下
- DataGrid问题winform 高分求解
- 获取FTP下的所有文件(包括子文件夹下的文件)列表(不包括文件夹)
- 我用文件打开对话框取得了一文件路径,想通过一按钮响应,记录到一个文件中,为什么下面的程序执行不了啊,在先等,急
- 系统不认那个sessioin变量了
- 调用WSDL生成的webservice代理类报错 [(407) Proxy Authentication Required]
- 一个窗体中的两个listview怎么同时显示选中状态?
有时候运行就完全没问题,有时候就说剪贴板没东西~~~
为什么呢??
看来我早上人品太差了啊
With mWord
.Visible = True ' word窗口可见
'.Activate
.Documents.Open Filename:=dstFileName
' 从excel表格中拷贝数据并粘贴到word表格中,通过标签定位
For i = LBound(arrName) To UBound(arrName)
'Application.Goto Reference:=arrName(i)
'Selection.Copy
srcSheet.Range(srcSheet.Names(arrName(i))).Copy
.Selection.Goto What:=wdGoToBook, Name:=arrName(i)
'.Selection.MoveDown Unit:=wdLine, Count:=1 ' 下移一行
.Selection.PasteAndFormat (wdFormatPlainText)
Next
End With