sjaserds
@sjaserds
Студент

Как в excel брать данные с листов не зная их имен?

Всем привет. У меня есть таблица и в ней есть листы. Вот мне нужно брать данные из 1 ячейки но при этом со всех листов начиная с 4 по счету листа. Это нужно для того чтобы в дальнейшем при добавлении нового листа не переписывать формулу. Заранее спасибо за развернутый ответ)
  • Вопрос задан
  • 71 просмотр
Решения вопроса 1
BasiC2k
@BasiC2k
.NET developer (open to job offers)
Вашу задачу гораздо проще решить на VBA.
После добавления нового листа запускаете макрос он обновит формулу.

Public Sub Test()
Dim i As Integer, sFormula As String

sFormula = "="
For i = 1 To ThisWorkbook.Sheets.Count
    If i >= 4 Then
        sFormula = sFormula & "'" & ThisWorkbook.Sheets(i).Name & "'!R2C2+"
    End If
Next

If sFormula <> "=" Then
    sFormula = Left(sFormula, Len(sFormula) - 1)
    ThisWorkbook.Sheets(1).Range("A1").FormulaR1C1 = sFormula
End If

End Sub


Как выглядит Ваша формула - можно посмотреть при запуске макрорекордера.
Ответ написан
Комментировать
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы