Как определить, содержит ли диапазон объединенных ячеек в VBA

У меня есть документ Excel, который содержит дежурные смены. Я хотел бы узнать, есть ли объединенные ячейки, как указано ниже, с заданным диапазоном.

пример

Как я могу определить, что ячейки заполнены заданным диапазоном или ячейки объединены в заданном диапазоне?

If IsEmpty(Range("NewRange")) = False Then z = z + 1 'My counter End If 

Я попробовал функцию IsEmpty, но она не работает правильно на объединенные ячейки. Вы можете попробовать, но результат такой же. Пока я получил блок пустых ячеек, он считается заполненным.

MS Excel 2010 и выше имеет свойство Range.MergeCells (Excel) , которое возвращает true, если диапазон содержит объединенные ячейки.

Другой метод вы найдете здесь: http://www.exceltrick.com/how_to/find-merged-cells-in-excel/

 Dim r As Range Set r = Range("A9:G10") With r If IsNull(.MergeCells) = True Or .MergeCells = True Then z = z + 1 End If End With 
  • Объединение содержимого ячеек с помощью VBA
  • форматирование ячеек в excel с использованием python
  • Excel не отбрасывает исходные данные, несмотря на слияние ячеек, что вызывает проблемы с функциями (например, сумма)
  • Объединение текста двух ячеек в качестве вывода для пути к файлу
  • Автоматическая группировка / слияние в Excel
  • Более детальное решение о том, как объединить ячейки между двумя значениями во втором столбце
  • Powershell превосходит ячейки слияния, когда ячейка может меняться
  • Объедините два значения, если оба значения одинаковы, кроме пустого в EXCEL
  • Объединение групп ячеек относительно столбца A
  • Соответствие индексов в Python
  • Суммировать значения столбцов в объединенной ячейке
  • Interesting Posts

    PHPExcel_Calculation_Exception: 10! I9 -> Формула Ошибка: Неожиданно,

    использовать переменную из $ get in query

    Как переименовать файл до -> скачать () с помощью Laravel Excel

    Я хочу, чтобы Excel прочитал значение в Calc и скопировал его на мой лист в Excel

    Как получить информацию, если строки в столбце выравниваются влево и как создавать новые ячейки с этой информацией на другом листе?

    Excel VBA – код разрывается при открытии Excel

    Excel, как найти значения в 1 столбце, существует в диапазоне значений в другом (приблизительном)

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

    Каков наилучший способ обновить формулу соответствия для условного форматирования?

    Доступ к таблице в таблице Excel с использованием C #

    OleDb-соединение с Excel; как выбрать фиксированную ширину, неограниченную высоту?

    Удаление определенных столбцов в excel

    Экспорт SSIS в шаблон Excel – VLOOKUP

    VBA .Find, даты, даты серийного номера и свойства типа данных (.Text, .Value, .Value2)

    Как создать текстовый файл, поэтому, когда он открывается в Excel, строки группируются вместе?

    Давайте будем гением компьютера.