Question

我有这段代码

    Sheets("Main").Columns("H:S").Copy
    Sheets("Main").Columns("H:S").PasteSpecial xlPasteValues

它不起作用，但手动工作得很好。什么问题？

运行时错误1004 说副本大小与粘贴大小不同

录制的宏在重复时也有相同的错误，没有合并的单元格和过滤器，没有隐藏的行和列

Answer 1

不同的方法......

With Sheets("Main").Columns("H:S") .Value = .Value End With