运行时错误'1004':选择范围类失败的VBA 2003方法

Question

我正在尝试将列从一个工作表复制到另一个工作表.我正在使用的代码是一个录制的宏,它可以正常工作,直到我将它连接到一个按钮.当我这样做时,它会给出"运行时错误'1004':选择范围类的方法失败"

这是代码,我可以看到它没有错.当我点击调试时,突出显示第二行.

Sheets("Count").Select
Columns("C:C").Select
Selection.Copy
Sheets("Add Invintory").Select
Range("b1").Select
ActiveSheet.Paste
Sheets("Count").Select
Sheets("Count").Columns("A:A").Select
Columns("A:A").Select
Selection.Copy
Sheets("Add Invintory").Select
Range("A1").Select
ActiveSheet.Paste

我不知道问题是什么.请帮忙

Answer 1

你应该总是避免使用.Select它们是错误的主要原因:)

你在试试吗？

Sub Sample()
    Sheets("Count").Columns("C:C").Copy _
    Sheets("Add Invintory").Columns("B:B")

    Sheets("Count").Columns("A:A").Copy _
    Sheets("Add Invintory").Columns("A:A")
End Sub