Перенос ячейки a1 c 10 листов на один, в столбик

[farookh1]

Перенос ячейки a1 c 10 листов на один, в столбик. Извините , что пложу темы, но не нашел похожего ничего.
Имеется N листов, пускай 10 или 5, на каждом из них a1 имеет какое-то значение. Нужно на общий лист перенести в столбик ячейки а1 по порядку в соответствии с номером листа.

Будте любезны, помогите, я думаю макрос простой, но я не смогу с нуля его написать пока что, потом наберу библиотечку макросов и постараюсь понять.

[IgorGO]

этот

Sub Banzay()
  Dim sh As Worksheet
  For Each sh In Worksheets
    Range("A" & sh.Index) = sh.Cells(1, 1)
  Next
End Sub

поместите в модуль листа1 и стартуйте любым доступным способом

[farookh1]

Спасибо Вам большое, я разобрался, но почти. Мне не понятно какой параметр отвечает за то, сколько по вертикали сверху отступать. Т.е понятно как заставить столбец сформироваться на столбце а б или ц,а вот с какой ячейки от верха не разобрался.