Member 13993074 Ответов: 1

Во время выполнения ошибка 424 в код, чтобы объединить титулы объявление

Привет,

Я пытаюсь создать заголовки объявлений, используя 4 столбца из 6 записей, чтобы объединить все 4 столбца в уникальные комбинации. Я нашел учебник для того, чтобы сделать это, и получаю ошибку runtime 424 в строке, начинающейся с "lrow". Я использую 32-битную версию Excel 2016

For i = 2 To 7
    For j = 2 To 7
        For k = 2 To 7
            For l = 2 To 7
                lrow = Sheet2.Cells(Rows.Count, 1).End(xlUp).Row + 1
                Sheet2.Cells(lrow, 1).Value = Sheet1.Cells(i, 1).Value & " " & Sheet1.Cells(j, 2).Value & " " & Sheet1.Cells(k, 3).Value & " " & Sheet1.Cells(l, 4).Value
            Next
        Next
    Next
Next


Что я уже пробовал:

Это относительно простой код, но я подозреваю, что он может быть для более ранней версии Excel. Я не знаю, что попробовать.

1 Ответов

Рейтинг:
0

Maciej Los

Цитата:
Я подозреваю, что это может быть для более ранней версии Excel.

Это неправда.

Чтобы решить вашу проблему, пожалуйста, прочтите это: Требуется объект (ошибка 424) | Microsoft Docs[^]

На первый взгляд кажется, что lrow переменная не инициализируется (или она меньше 1). Вы можете легко обнаружить его с помощью отладчика. Видеть: Отладка в Excel VBA - простые макросы Excel[^]