在此代码中某处的Vba错误，它不允许我的代码运行

Question

{{1}}

Answer 1

有许多可能的答案。最可能的是你应该改变：

Cells(i, 1).Select来 Sheets("CustomerList").Cells(i, 1).Select

其他是 - 检查范围变量中是否包含值以及工作表是否以命名方式存在。此外，在顶部使用Option Explicit以确保您编写一个更好的代码。