Gibt es eine automatisierte Möglichkeit, die Namen und die Reihenfolge von Excel-Tabellen zu bearbeiten?

Ich möchte die Reihenfolge der Arbeitsblätter in einer Excel 2007-Arbeitsmappe umkehren und mich fragen, ob dies nur durch einen mühsamen manuellen Vorgang möglich ist. Ich habe ungefähr 100 Blätter, daher möchte ich die manuelle Vorgehensweise vermeiden, sehe jedoch keine programmgesteuerte Möglichkeit, dies zu erreichen.

Gibt es eine einfache Möglichkeit, ein Blatt anhand seines Namens zu suchen, um es auszuwählen?

Sie können die Blätter programmgesteuert durchlaufen und ihre Reihenfolge mit folgendem Code umkehren:

Sub ReverseSheets()
Dim i As Integer

For i = 1 To Worksheets().count
    Worksheets(i).Move before:=Worksheets(1)
Next i

End Sub

Dieser Code kehrt automatisch alle Blätter in einer Arbeitsmappe um. Die genaue Anzahl der Blätter spielt keine Rolle, da jedes Mal nach der Anzahl der Blätter gesucht wird.

Die Suche nach Blattnamen ist zwar möglich, aber wesentlich komplizierter als das Umkehren der Blätter. Hier sind einige Websites, die Ihnen den Einstieg erleichtern sollen:

http://automation-beyond.com/2010/01/27/how-to-find-excel-worksheet-by-name/

http://www.mrexcel.com/forum/excel-questions/58374-visual-basic-applications-find-sheet-name.html

Um einen Blattnamen zu ändern, können Sie VBA verwenden:

1. Wählen Sie Ihr Blatt: Sheets("Sheet1".Select

2. Benennen Sie Ihr Blatt um: Sheets("Sheet1").Name = "SheetA"

Dann erstellen Sie einfach eine Schleife, mit der Sie alle Blätter durchlaufen und die gewünschten Namen zuweisen können.