excel - 当我尝试从字符串更改为变量 (VBA) 时出现错误 91

Question

所以，我在尝试从另一个工作簿中查找和复制内容时遇到了一些问题，这是我的代码：

Sub beta()


Dim actual As Workbook: Set actual = ActiveWorkbook
Dim brf As Workbook: Set brf = Workbooks.Open(Filename:="brf.csv", Local:=True)
brf.Sheets("brf").Range("A1:E1").Delete
brf.Sheets("brf").Range("D:D").NumberFormat = "@"
Dim numerofilas As Integer
Dim etiqueta As String
Dim caudal As Double
actual.Activate

numerofilas = actual.Sheets(1).Range("C1", Range("C1").End(xlDown)).Rows.Count

actual.Sheets(1).Range("H1").Select
For x = 1 To numerofilas
    etiqueta = ActiveCell.Text
    ActiveCell.Offset(0, -1).Value = 
    brf.Sheets("brf").Range("D:D").Find(etiqueta).Offset(0, 1).Value

    ActiveCell.Offset(1, 0).Select
    Next

End Sub

在 For() 循环中，当我将“123”分配给 etiqueta 时，它工作得很好，但是当我尝试分配 ActiveCell.Value 时，我在执行中得到“错误（91）”。

谢谢。

标签： excelvba