簡體   English   中英

VBA Excel +使用匹配功能

[英]VBA Excel + using match function

我在一段代碼中遇到了某種問題。 我需要在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)時,它可以工作。 當我使用小文件查找其值時。 在較大的文件上有時不這樣做。

有任何想法嗎?

我遇到了類似的問題。 我使用Match函數中的ThisWorkbook.Sheets(“ MySheet”)。Range(...)修復了該問題。 或嘗試使用ActiveWorkbook(如果適用)。 讓我知道這是否有效。 好奇地知道。

順便說一句,我注意到列號和行號都是“行”。 那是個錯誤嗎?

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM