сумма ячеек

[pirat:)]

Здрасте! Есть проблемка! Имеется много листов, на листе "сумма" в ячейке b3 необходимо просуммировать ячейки b3 остальных листов. Сложность в следующем: листы то прибавляются то удаляются. Как сделать так чтобы сумма вычислялось независимо от названия листа? Заранее спасибо!

[valerij]

Сообщение от pirat:)

независимо от названия листа?

Select Case sh.Index

[pirat:)]

а можно поподробнее!

[valerij]

Сообщение от pirat:)

а можно поподробнее!

Листы выбираются не по именам(на ярлычках), а по идексу, например

Select Case sh.Index
        Case 1 To 13 ' Выбраны 13 листов
End Select

[IgorGO]

Назвать первый лист №1, последний №П, эти листы не заполнять включить их в формулу суммирования, остальные листы вставлять (удалять) между этими двумя. В формулах, где включено много листов эксель запоминает первый и последний и корректно суммирует все, что находится между ними.

[pirat:)]

спасибо! Очень помогли!

[SAS888]

Можно применить следующий макрос, который в ячейке "B3" листа "Сумма" подсчитает сумму ячеек "B3" всех других листов книги, не зависимо от их количества.
Можно запускать макрос "вручную", а можно по наиболее подходящему для Вас событию (или по нескольким).

Sub SumB3()

    Dim sh As Worksheet, Sm As Double
    For Each sh In ThisWorkbook.Sheets
        If sh.Name <> "Сумма" Then Sm = Sm + sh.[B3]
    Next
    Sheets("Сумма").[B3] = Sm

End Sub

P.S. Если есть необходимость, можно вставить проверку: является ли значение в ячейке "B3" текущего лиса числом.