Вопрос по замене ячеек

[Казанский]

Можно без очистки: выделить первую ячейку (А3), Ctrl+Shift+стрелкаВниз, F5 - выделить - константы, снять галку "числа" - ОК.
Будет выделена первая нечисловая ячейка. Нажать "=", кликнуть вышестоящую ячейку, Ctrl+Enter.
Или то же самое, после выделения А3, макросом в одну строку:

Sub Макрос1()
Range(Selection, Selection.End(xlDown)).SpecialCells(xlCellTypeConstants, 22).FormulaR1C1 = "=R[-1]C"
End Sub