Ответ: excel для DATAMERGE
masterdoom
Выбираешь последнюю ячейку в колонке и запускаешь макро
Sub Macro()
мyString = ActiveCell.AddressLocal
pos = InStr(2, myString, "$", vbTextCompare)
If pos > 0 Then
colName = Left(myString, pos)
colName = Replace(colName, "$"...