Как объединить только видимые ячейки в Excel?

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

Объединение только значений видимых ячеек в одну ячейку с помощью кода VBA

Объединение только значений видимых ячеек в одну ячейку с помощью кода VBA

Вы можете создать Пользовательскую функцию для решения этой задачи, пожалуйста, выполните следующие шаги:

1. Удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Нажмите Вставить > Модуль и вставьте следующий код в окно Модуля.

Код VBA: Объединение только значений видимых ячеек:

Private Function ConcatenateVisible(xRg As Variant, sptChar As String)
'Updateby Extendoffice
    Dim rg As Range
    For Each rg In xRg
        If (rg.EntireRow.Hidden = False) And (rg.EntireColumn.Hidden = False) Then
            ConcatenateVisible = ConcatenateVisible & rg.Value & sptChar
        End If
    Next
    ConcatenateVisible = Left(ConcatenateVisible, Len(ConcatenateVisible) - Len(sptChar))
End Function

3. Затем сохраните и закройте этот код, вернитесь на лист и введите эту формулу: =concatenatevisible(B2:B10,"-") (B2:B10 — это диапазон отфильтрованных данных, которые вы хотите объединить, “-” — разделитель для разделяемых объединенных значений, вы можете изменить их по своему усмотрению.) в пустую ячейку, где вы хотите разместить объединенный результат, а затем нажмите клавишу Enter, чтобы получить результат. См. скриншот:

Примечание: С помощью этой Пользовательской функции объединенный результат будет динамически меняться вместе с вашими отфильтрованными данными, например, если вы отфильтруете продукт KTO, ваш объединенный результат изменится на новые отфильтрованные данные. См. скриншот: