Question

我在一段代码中遇到了某种问题。我需要在excel书中找到值，然后将其复制到另一本书中。问题是我需要在正确的地方按概念复制概念。问题是文件不是每周都以相同的顺序出现。所以我需要找到这个概念，然后复制下一个那个概念值的单元格。首先，我使用需要找到正确的行，以便我可以开始复制（这部分很容易，并完成）。其次，拥有正确的线，我需要找到概念，在这个例子中我将使用＆＃34; 619＆＃34;。在找到该值的位置后，我将值存储在＆＃34; c_audiovisual＆＃34;中。

 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

我遇到了类似的问题。我在Match功能中使用ThisWorkbook.Sheets（“MySheet”）。Range（...）来修复它。或者尝试使用ActiveWorkbook。如果有效，请告诉我。很想知道。

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

VBA Excel +使用匹配功能

1 个答案: