У меня есть эта пользовательская функция VBA
Public Function concatenatespecial(rng As Range) As String
Dim rng1 As Range
concatenatespecial = ""
For Each rng1 In rng
If (Not Rows(rng1.Row).Hidden) And (rng1.Value <> "") And (Not rng1.Interior.ColorIndex = -4142) Then
concatenatespecial = concatenatespecial & rng1.Text & "|"
End If
Next rng1
End Function
Он берет все желтые и непустые ячейки в диапазоне и объединяет его с "|".
Проблема в том, что он работает, только если эти ячейки окрашены вручную. Когда это окрашено условным форматированием, это не работает.
Не могли бы вы помочь мне с решением?
Лучшее объяснение: