如何将“仅值”从一个工作簿复制并粘贴到另一个工作簿?

如何将“仅值”从一个工作簿复制并粘贴到另一个工作簿?

有人可以教我如何将“仅值”从一个工作簿复制并粘贴到另一个工作簿吗?

工作簿包含大约 20 个工作表,我不想将每个工作表一个接一个地复制并粘贴到新的工作簿中。

答案1

Sub CopyPasteSpecVal_1()

  Selection.Copy
  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _ 
    SkipBlanks:=False, Transpose:=False
  Application.CutCopyMode = False

End Sub

相关内容