Я пытаюсь написать код IsEmpty
для проверки наличия пустых ячеек в определенном диапазоне выбора. Дело в том, что он не может быть жестко запрограммирован, например B100:J
, потому что я постоянно импортирую данные, поэтому диапазон данных будет постоянно меняться и никогда не будет прежним. Итак, перед тем, как сделать Excel в формате PDF с помощью макроса, я хочу проверить все ячейки, чтобы увидеть, есть ли пустая ячейка, поэтому я могу удалить ее или внести изменения в нее. Код ниже - это то, что у меня есть, но он не работает, и я застрял, все помогает! Причина, по которой у меня есть B15:J15
, заключается в том, что именно там данные начинаются и заканчиваются, но я никогда не узнаю, как долго они будут go падать, они могут go с B100:J100
или B30:J30
. Спасибо всем.
Sub IsEmpty()
'check to see if there are any blank cells before archiving
Dim N As Range
Set N = Range("B15:J15").End(xlDown)
If IsEmpty(Range(N).Value) = False Then
MsgBox ("Blank information, please double check")
End If
End Sub