1

所以我试图将大量数据从一个工作簿复制到另一个工作簿。问题是源工作簿中的数据有一些奇怪的格式,所以我只想获取这些值。我到目前为止的代码是这样的。

excel=win32com.client.Dispatch("Excel.Application");
excel.Visible = 1;
source = excel.Workbooks.Open(Cali.xlsm');
copy = excel.Workbooks.Open(temp.xlsx');
sdata = source.ActiveSheet;cdata = copy.ActiveSheet;
data=sdata.Range("89:89")
sdata.Range("89:89",data.End(4)).Copy()

现在我可以使用

cdata.Paste()

但它也粘贴了格式

我发现

cdata.PasteSpecial()

但它也会粘贴格式。

任何知道如何使用 PasteSpecial() 以便它只复制值的人,或者有人知道更好的方法,我会非常感激。

4

1 回答 1

3

您可以尝试以下操作,将单元格 A1:A3 中的值从一个工作簿复制到另一个工作簿。

from win32com.client import Dispatch
wkbk1 = "...\workbook1.xlsx"
wkbk2 = "...\workbook2.xlsx"
excel = Dispatch("Excel.Application")
excel.Visible = 1
source = excel.Workbooks.Open(wkbk1)
excel.Range("A1:A3").Select()
excel.Selection.Copy()
copy = excel.Workbooks.Open(wkbk2)
excel.Range("A1:A3").Select()
excel.Selection.PasteSpecial(Paste=-4163)

wkbk1 和 wkbk2 是两个工作簿的文件路径。

于 2012-02-16T20:59:52.283 回答