Excel VBA - 根据找到的单元格创建命名范围

Question

我正在尝试根据使用以下内容找到的单元格来确定如何创建命名范围

    For Each Cell In ISBN_Range
            If Cell.Value = ISBN Then
                ISBN_Valid = True
                ISBN_Found = Range("A" & Cell.RowIndex & ":E" & Cell.RowIndex)
                ISBN_Found.Interior.ColorIndex = 6
                Exit For
            End If
        Next Cell

这不起作用，我不知道为什么，我还没能在其他地方找到答案，对不起，如果这很简单！我基本上只想制作找到的单元格存在于命名范围内的数据行。 ISBN_Found在我的代码中被更早地声明为范围，所以这不是问题。

Answer 1

我在评论中得到了一些人的帮助，最终代码如下：

For Each Cell In ISBN_Range
            If Cell.Value = ISBN Then
                ISBN_Valid = True
                Set ISBN_Found = Range("A" & Cell.Row & ":E" & Cell.Row) 
                ISBN_Found.Interior.ColorIndex = 6 
                Exit For
            End If
        Next Cell

只需从“Cell.RowIndex”中删除“索引”