如何使用macrosbutton将数据表中的数据添加到另一个工作表？

我想用数据表中的button添加数据到账单表，但是它不工作。 当我在账单运行时代码工作正常，但是当我在数据表中运行时，代码无法正常工作。

这是我的代码：

Sub Button1_Click() Dim i As Integer For i = 22 To 42 If IsEmpty(Range("C" & i)) Then Sheets("PRICE LIST").Range("C3").Copy Destination:=Sheets("INVOICE EU").Range("C" & i) Sheets("PRICE LIST").Range("D3").Copy Destination:=Sheets("INVOICE EU").Range("E" & i) Sheets("PRICE LIST").Range("E3").Copy Destination:=Sheets("INVOICE EU").Range("K" & i) Sheets("INVOICE EU").Range("L" & i).Value = Sheets("PRICE LIST").Range("F3").Value Exit For Else End If Next i End Sub 

数据表是PRICE LIST，账单是INVOICE EU

Answer 1

你提到这个macros对不同的纸张有不同的影响。 下面定义的行取决于具有焦点的表单

 If IsEmpty(Range("C" & i)) Then 

检查范围c22：c42时，是否可能要引用特定工作表？