Формула с изменяемым именем листа

[fun_kok]

Есть формула на VBA:
Range("G3").FormulaLocal = "=НАЙТИ(""-""; Лист 1!C3)".
Как сделать, чтоб можно было в цикле использовать эту формулу (Лист 1!C3, Лист 2!C3, Лист 3!C3......Лист n!C3), т.е. перебрать все листы.

[IgorGO]

а смысл?

в результате:
в Range("G3") у Вас по очереди будут меняться данные и в итоге останется "=НАЙТИ(""-""; Лист n!C3)"
можно сразу вписать Range("G3").FormulaLocal = "=НАЙТИ(""-""; Лист n!C3)"
где n - номер последнего листа.

[fun_kok]

Range("G3").FormulaLocal = "=НАЙТИ(""-""; Лист 1!C3)" - это только часть формулы, мне нужно понять как правльно записать формулу используя переменную в имени листа.

[IgorGO]

for i = 1 to n
  Range("G3").FormulaLocal = "=НАЙТИ(""-""; Лист " & i & "!C3)"
next i

[fun_kok]

Спасибо! делал так же, просто забыл один & после i поставить.

[fun_kok]

IgorGO
Есть след таблица:
http://pixs.ru/showimage/123png_1795831_10952106.png
Разницу мячей я вычислил формулами Эксель. Как мне лучше теперь вычислить общую разницу по каждому человеку(ЧЧЧ,, РРР.......), формулами или VBA??? если поможешь с алгоритмом , буду рад.

[fun_kok]

Разобрался.

[fun_kok]

Почему, при разделении длинной формулы на две строчки(пробел_) появляется ошибка : Expected:list separator or)
=ЕСЛИ(НАЙТИ("-";E5)<=1;0;ЗНАЧЕН(ЛЕВСИМВ(E4;НАЙТИ( "-";E4)-1))) + ЕСЛИ(НАЙТИ("-";F4)<=1;0;ЗНАЧЕН(ЛЕВСИМВ(F4;НАЙТИ( "-";F4)-1))) + ЕСЛИ(НАЙТИ("-";G4)<=1;0;ЗНАЧЕН(ЛЕВСИМВ(G4;НАЙТИ( "-";G4)-1))) + ЕСЛИ(НАЙТИ("-";H4)<=1;0;ЗНАЧЕН(ЛЕВСИМВ(H4;НАЙТИ( "-";H4)-1))) + ЕСЛИ(НАЙТИ("-";I4)<=1;0;ЗНАЧЕН(ЛЕВСИМВ(I4;НАЙТИ( "-";I4)-1))) _
- (ЕСЛИ(НАЙТИ("-";E4)<=1;0;ЗНАЧЕН(ПРАВСИМВ(E4;ДЛСТР (E4)-НАЙТИ("-";E4)))) + ЕСЛИ(НАЙТИ("-";F4)<=1;0;ЗНАЧЕН(ПРАВСИМВ(F4;ДЛСТР (F4)-НАЙТИ("-";F4)))) + ЕСЛИ(НАЙТИ("-";G4)<=1;0;ЗНАЧЕН(ПРАВСИМВ(G4;ДЛСТР (G4)-НАЙТИ("-";G4)))) + ЕСЛИ(НАЙТИ("-";H4)<=1;0;ЗНАЧЕН(ПРАВСИМВ(H4;ДЛСТР (H4)-НАЙТИ("-";H4)))) + ЕСЛИ(НАЙТИ("-";I4)<=1;0;ЗНАЧЕН(ПРАВСИМВ(I4;ДЛСТР (I4)-НАЙТИ("-";I4)))))

[Казанский]

Это в VB(A) перенос строки " _", а в ячейке Alt+Enter.

[fun_kok]

Мне и надо в Vba. Спс. я разобрался.