Есть макрос, который последовательно делает операции на листе, затем переходит на следующий активный лист. Требуется определить, является ли текущий активный лист последним в книге, например поставить флажок T=1 если последний, T=0, если далее активные листы есть.
У вас неточность в первом сообщении. Активный лист - это лист, который отображается на мониторе. Только один лист может отображаться на мониторе, поэтому существует только один активный лист, а не несколько.
Макрос
Sub макрос()
Dim sh As Worksheet
For Each sh In Worksheets
' Если это последний лист.
If sh.Index = Worksheets.Count Then
' Действия.
' Если это не последний лист.
Else
' Действия.
End If
Next sh
End Sub