Сделать ячейки равной конкатенации ее столбцами и строками заголовков в Excel

Question

У меня есть (большая) таблица с заголовками в следующем формате: table with row and column headers

Я хотел бы установить клетки, помеченные с 'x' для конкатенации заголовка столбца и заголовка строки, разделенного запятой. Например, ячейка B2 должна быть установлена ​​на «c1_HEADER, r1_HEADER».

Есть ли формула, которую я могу использовать для достижения этой цели? По крайней мере, нажав отмеченные ячейки «x» и применив формулу? Мне бы очень не хотелось идти по ручному маршруту: /.

TIA.

Answer 1

Если мы начнем с:

работает этот макрос:

Sub luxation() 
    Dim r As Range 

    For Each r In Range("B2").CurrentRegion 
     If r.Value = "x" Then 
      r.Value = r.EntireColumn.Cells(1).Value & "," & r.EntireRow.Cells(1).Value 
     End If 
    Next r 
End Sub 

будет производить:

Примечание:

в этом макро Range("B2").CurrentRegion представляет блок клеток, которые мы Перебор. Переменная r - это диапазон с одной ячейкой, который облегчает цикл.