如何复制数据透视表值而不复制它?

时间:2016-06-17 08:32:08

标签: vba excel-vba optimization excel

我有一张带有数据透视表的工作表,我想将整个PT作为值复制到另一个工作表。如果不使用.Copy.PasteSpecial方法,我该怎么做?

我想知道类似的事情:

wsTarget.Cells = wsPivot.Cells.Value

但它给了我一个 Out of memory 错误。

1 个答案:

答案 0 :(得分:0)

因此,在没有实际复制的情况下复制(/ tranfsfer)数据透视表的方法之一是:

wsTarget.Range(wsp.Range("A1").CurrentRegion.Address).Value = _ 
  wsPivot.Range("A1").CurrentRegion.Value