вернуть значение динамической ячейки

[Galbert]

в ячейке A1 выводятся результаты вычислений в зависимости от параметра ячейки B1, которые могут принимать значение от 1 до 10.
Помогите, плиз, составить таблицу, которая будет содержать параметры от 1 до 10 и соответствующие им результаты из ячейки A1.

[IgorGO]

правой кнопкой по ярлычку листа, "исходный текст", вставте туда этот

Private Sub Worksheet_Change(ByVal Target As Range)
    If Application.Intersect([a1], Target) Is Nothing Then Exit Sub
    If [b1] < 1 Or [b1] > 10 Then Exit Sub
    Application.EnableEvents = False
    Range("c" & [b1]) = [b1]
    Range("d" & [b1]) = [a1]
    Application.EnableEvents = True
End Sub

[Galbert]

Спасибо,
это мое первое знакомство с макросом. Возможно, я плохо сформулировал задачу, либо что-то не так делаю с записью макроса.
Попробую еще раз:
ячейка A1 - динамическая, отображает результат вычислений, скажем суммы ячейки B1 (константа=1) и C1 (динамическая, принимает значения от 1 до 10). Таким образом, в ячейке A1 отображаются числа от 2 (1+1=2) до 11 (1+10=11)
Хочу создать таблицу (на том же листе), верхняя строка которой перечисляет значения динамической ячейки C1, а в нижнюю автоматически заносятся соответствующие им результаты вычислений из ячейки A1.
Спасибо за помощь

[Galbert]

Получилось! Невероятно! Осталось попрактиковаться в использовании.
Еще раз спасибо

[Galbert]

Надоело вручную вводить значения в ячейку C1.
Задача та же:
ячейка A1 - динамическая, отображает результат вычислений, скажем суммы ячейки B1 (константа=1) и C1 (динамическая, принимает значения от 1 до 10). Таким образом, в ячейке A1 отображаются числа от 2 (1+1=2) до 11 (1+10=11)
Хочу создать таблицу (на том же листе), верхняя строка которой перечисляет значения динамической ячейки C1, а в нижнюю автоматически заносятся соответствующие им результаты вычислений из ячейки A1.
Решение дал IgorGo - см. выше
Можно ли автоматизировать процесс, так чтобы в таблице, отображающей итоги автоматически выводился результат. Иначе приходится каждый раз вводить значения в ячейку C1 вручную.
Спасибо за помощь.

[IgorGO]

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

[Galbert]

честно говоря ничего не понял. Даже последней фразы....
Да высланная таблица содержит результаты вычислений. Но как мне самому автоматизировать процесс? Видимо в код надо добавить какие-то команды....

[IgorGO]

я сам решительно ничего не понимаю (за исключением последней фразы), если все полностью автоматизировать у вас именно так и получится - готовая таблица. чего вы добиваетесь? какова задача?

[Galbert]

используя с небольшими изменениями Ваш макрос, я получаю таблицу, которая отражена в высланном Вами файле. Но для этого я вынужден вручную вставлять в ячейку C1 цифры от 1 до 10. Ведь если это большой диапазон (от 1 до 100 и больше),- совсем трудоемко. Есть ли возможность определять диапазон значений C1 командой в макросе?

[IgorGO]

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