Відповіді:
Якщо VBA scriptє варіант, то спробуйте це.
Створіть кнопку і призначте її;
Sub Button1_Click()
i = 1
While i < 10
Cells(i, 1).Value = " " + Cells(i, 1).Value
i = i + 1
Wend
End Sub
Пам'ятайте лише, що при використанні Cellsкоманди він посилається на клітинки, використовуючи лише числа, і обертається назад (рядок, стовпець), тому комірка A1була б 1,1і комірка H5була б 5,8.