Как присвоить значение ячейки переменной? - PullRequest
0 голосов
/ 03 мая 2019

Я пытаюсь получить какое-то значение ячейки и присвоить его переменной.

Vars 'result' и 'result2' - это два длинных значения, которые содержат строку и столбец для значения, которое я ищуявляется.Я проверил, и числа совпадают в таблице, но когда я запускаю код, он говорит:

Ошибка 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

1 Ответ

1 голос
/ 03 мая 2019

Это проблемная строка

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

должно быть

cellValor = Sheets("2017").Cells(result2, result).Value
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...