значения переменной

[СерегаП]

я только начал изучать макросы и извиняюсь заранее за простой вопрос! есть допустим столбец "с" с любыми значениями нужно чтоб ему соответствовал столбец "А"
вот макрос который я наваял

c = "=c1"
For i = 1 To 10
For t = 1 To 10
Range("A" + Trim(Str(i))).Select
ActiveCell.Formula = c
c =

Next t
Next i
End Sub

и вот здесь загвоздка ячейки он нормально выделяет на одну вниз каждый раз в столбце А, а вот чтобы также шел по столбцу С не получает или я просто синтаксис не знаю ...Поможите люди добрые )

[СерегаП]

что после с ставить типа чтоб получилось с=ячейка с1 + 1

[Казанский]

В даннос случае цикл не нужен:

range("A1:A10").formula="=C1"

или

[A1:A10].formula="=C1"

Если все же хотите циклом, то

for i=1 to 10
    range("A" & i).Formula ="=C" & i
next

[СерегаП]

спасибо работает ) просто еще я хотел узнать в столбце а по моей формуле перемещение получается а в С нет . никак нельзя указать для с спуск на определенное колл-во ячеек?

[СерегаП]

Set cell = [c1]

For i = 1 To 10
Range("A" + Trim(Str(i))).Select
ActiveCell.Formula = cell
cell = cell + 1
Next i
End Sub

типа этого толь чему равно cell чтоб переместиться или таким методом нельзя решить данную задачу?

[Казанский]

Set cell = cell.Offset(1, 0)

или

Set cell = cell(2)

Но старайтесь не использовать Select и соответственно Асtivecell, это удлиняет и замедляет код.

[СерегаП]

спасибо буду знать! еще бы кто нить посоветовал хорошую книжку для начинающих чтоб понятным языком было написано и зря время у людей не отнимать ...