Как определить, является ли объединенная ячейка пустой, и показать всплывающее сообщение

Question

Мне нужно показать всплывающее сообщение, указывающее, что в таблице по каждому столбцу отсутствует некоторая информация, например, если в столбце A пуста одна ячейка, то всплывающее сообщение скажет: «Пожалуйста, заполните пропущенные значения в столбце».A ',' заполните пропущенные значения в столбце B '...

Таблица с объединенными ячейками

LastRow = sht.Cells(sht.Rows.Count, StartCell.Column).End(xlUp).Row
LastColumn = sht.Cells(StartCell.Row, sht.Columns.Count).End(xlToLeft).Column
sht.Range(StartCell, sht.Cells(LastRow, LastColumn)).Select

For Each Cell In Selection
For Row = 1 To LastRow
    If Cells(Row, 1).Value = "" Then
        if isempty(Cells(Row,1).mergearea().Value = true
            MsgBox "Please fill in the code"
    End If

    If Cells(Row, 2).Value = "" Then
        MsgBox "Please fill in the description" & Row
    End If

    If Cells(Row, 8).Value = "" Then
        MsgBox "Please fill in the discounting %" & Row

            ElseIf Cells(Row, 8).Value <> ">36%" Then
            Cells(Row, 8).Interior.ColorIndex = 4
    End If
Next Row

Должен ли я использовать для каждой ячейки в выбореили для следующего цикла?Этот код будет использоваться в качестве шаблона, что означает, что число или строки различаются каждый раз, в зависимости от количества перечисленных элементов кода (столбец A). Достаточно ли первых 3-х строк кода, чтобы найти последнюю строку непустых ячеек??

Когда я выполняю код, всплывающих сообщений всегда больше, чем фактическое количество пустых ячеек.Похоже, я не могу определить, является ли объединенная ячейка пустой или нет.

Наконец, мне также нужно увидеть значение в столбце со скидкой, является ли значение в ячейках> 36%, если да, товесь ряд выделен.Как я могу написать это?Большое спасибо, ребята!