Пример макроса в excel перенос значения в другую ячейку