[Q&A][Excel] 类Range的PasteSpecial方法无效

标签：

环境说明：

VS2013(C#)+Office2013

Bug说明：

range1.Copy(Type.Missing);

range2.PasteSpecial(Excel.XlPasteType.xlPasteValues, Excel.XlPasteSpecialOperation.xlPasteSpecialOperationNone, false, false);

其中range1和range2来自两个Excel.Applicaton，即想从一个Excel.Applicaton1中拷贝数据到另一个Excel.Applicaton2中，会出现“类Range的PasteSpecial方法无效”的异常；（在C#中通过Excel.Application可以New出来不同线程的Excel进程，然后各自处理数据）

参考解决方法：

先从Excel.Applicaton1的录制宏模拟该操作，然后根据宏代码（VBA）来调整代码；

在源Excel.Application1中进行拷贝的宏代码：

Sub 宏2()
    Range("F11:J11").Select
    Application.CutCopyMode = False
    Selection.Copy
End Sub

然后在另一个Excel.Applicaton2中粘贴的宏代码：

Sub 宏2()
    Range("G13").Select
    ActiveSheet.PasteSpecial Format:="文本", Link:=False, DisplayAsIcon:=False
End Sub

在粘贴时会弹出提示框：

注意，如果是在同一个Excel线程下打开的两个Excel文件，粘贴时是不会出现该提示框的，可以从任务管理器中查看是否是同一个Excel线程：

通过上面两端VBA代码可以知道，Excel在处理不同进程之间的粘贴时，是通过WorkSheet.PasteSpecial方法处理的；所以在C#中将拷贝代码改为如下：

sourceRng.Copy();
targetRng.Select();
m_TargetSheet.PasteSpecial("文本", false, false);

即先对数据源Range进行Copy，然后选择要粘贴的Range，再进行粘贴。

[Q&A][Excel] 类Range的PasteSpecial方法无效

标签：

原文地址：http://www.cnblogs.com/memento/p/4228655.html