如何将复制的对象粘贴到Excel中的特定单元格
我已经写了下面的代码从Outlook EMail复制一个表:
Set objApp = GetObject(Class:="Outlook.Application") Set objDoc = objApp.ActiveInspector.WordEditor objDoc.Tables(1).Range.Copy
我知道我们可以粘贴这个复制objDoc(这是一个对象)使用行: excWkSht.Paste
这是随机粘贴在Excel表。
我试图粘贴这个在第一个单元格使用: excWkSht.Cell(1, 1).Range.Paste
但它会抛出错误
“运行时错误'438':对象不支持此属性或方法”
有人可以帮我解决这个错误吗?
根据https://msdn.microsoft.com/en-us/library/office/ff821951.aspx
Worksheet.Paste允许我们select目的地作为提供的范围。 举个例子,你可以使用:
excWkSht.Paste Destination:=excWkSht.Cells(1, 1)