首页 > 解决方案 > 如何将单元格值分配给变量?

问题描述

我正在尝试获取一些单元格值并将其分配给一个变量。

Vars 'result' 和 'result2' 是两个 Long 值,其中包含我要查找的值是哪一行和哪一列。我已经检查过并且表格上的数字匹配但是当我运行代码时它说

错误 1004“应用程序定义或对象定义错误”。

这是我得到的:

For row = 1 To countRows
    brand = Sheets("2017").Cells(row, 1)
    If InStr(strSaida, brand) Then
        result2 = row
    End If
Next row

For col = 2 To countCol
    mes = Sheets("2017").Cells(2, col)
    If InStr(strProcMes, mes) Then
        result = col
    End If
Next col

Dim cellValor As Long
cellValor = Sheets("2017").Range(Cells(result2, result)).Value

标签: excelvbarange

解决方案


这是问题线

cellValor = Sheets("2017").Range(Cells(result2, result)).Value

它应该是

cellValor = Sheets("2017").Cells(result2, result).Value

推荐阅读