VBA Excel +使用match函数

Question

我在一段代码中遇到了一些问题。我需要在excel账簿中找到值，然后将其复制到另一个。问题是我需要把它一个概念一个概念地复制到正确的地方。问题是文件并不是每周都以相同的顺序出现。所以我需要找到这个概念，然后复制下一个单元格，它就是这个概念的值。首先，我需要找到正确的行，这样我就可以开始复制了(这部分很简单，已经完成了)。其次，有了正确的行，我需要找到概念，在本例中我将使用"619“。在找到该值的位置后，我将该值存储在"c_audiovisual“中。

 On Error GoTo ErrhandlerCAV
         lRowC_AV = Application.WorksheetFunction.Match(619, Range("A" & line & ":FI" & line), 0) + 1

       'On Error GoTo ErrhandlerCAV
Continue:
        If errorCAV = 1 Then
                c_audiovisual = 0
                errorCAV = 0
        Else
                c_audiovisual = ActiveSheet.Cells(line+ m2, lRowC_AV).Value
        End If

我已经逃脱了，以防这个概念不在那一行中出现(有时会发生)。

当我在调试模式下(按F8键)时，这段代码可以工作，而其他代码则不行。当我使用小文件查找值时，它是有效的。在较大的文件上有时不会。

有什么想法吗？

Answer 1

我也遇到过类似的问题。我用ThisWorkbook.Sheets("MySheet").Range(...)修复了它在Match函数内部。或者根据需要尝试使用ActiveWorkbook。让我知道这是否有效。好奇地想知道。

顺便说一下，我注意到列号和行号都是"line“。这是个错误吗？