Die Excel/VBA-Beispiele (incl. aller Arbeitsmappen: http://www.herber.de/samples/inhalt.html)

Arbeitsmappe durchblättern

Problem: Wie kann ich die Tabellenblätter einer Arbeitsmappe nacheinander auswählen?


StandardModule: basMain

Sub VorigesBlatt()
    If ActiveSheet.Index = Worksheets.Count Then
        Worksheets(1).Select
    Else
        Worksheets(ActiveSheet.Index + 1).Select
    End If
End Sub