✅ Erstellen Sie schnell ein Zusammenfassungsarbeitsblatt mit Hyperlinks in Excel

Inhaltsverzeichnis

Viele meiner Kollegen verbringen viel Zeit damit, ein Zusammenfassungsarbeitsblatt in Excel zu erstellen.

Ein typisches Zusammenfassungsarbeitsblatt enthält die Namen aller Arbeitsblätter in verschiedenen Zellen und alle Namen sind auch mit diesen Arbeitsblättern verknüpft.

Sie können also auf eine Zelle mit einem Blattnamen klicken (sagen Jan, Feb, März… ) und Sie gelangen zu diesem Arbeitsblatt. Darüber hinaus befindet sich auf jedem Arbeitsblatt auch ein Hyperlink, der auf das Übersichtsarbeitsblatt verweist.

Während meine Kollegen dabei sehr effizient geworden sind, ist es immer noch Zeitverschwendung, wenn Sie dasselbe in weniger als einer Sekunde tun können (ja, Sie haben richtig gelesen).

Der Trick besteht darin, ein kurzes Makro zu erstellen, das dies für Sie erledigt.

Unabhängig davon, wie viele Arbeitsblätter Sie haben, wird sofort ein zusammenfassendes Arbeitsblatt mit funktionierenden Hyperlinks erstellt.

Etwas wie unten gezeigt:

Wie Sie im Bild oben sehen können, erstellt es sofort die Zusammenfassung, wenn Sie das Makro ausführen (indem Sie auf die Schaltfläche klicken). Die Blattnamen sind mit einem Hyperlink versehen, der Sie zum Arbeitsblatt führt, wenn Sie darauf klicken.

Zusammenfassendes Arbeitsblatt mit Hyperlinks erstellen

Die ganze schwere Arbeit beim Erstellen des zusammenfassenden Arbeitsblatts wird von einem kurzen VBA-Code erledigt. Sie müssen nur den Code ausführen und eine Pause einlegen, da Sie jetzt etwas Freizeit hätten 🙂

Hier ist der Code:

Sub CreateSummary() 'Erstellt von Sumit Bansal von trumpexcel.com 'Dieser Code kann verwendet werden, um ein zusammenfassendes Arbeitsblatt mit Hyperlinks zu erstellen Dim x As Worksheet Dim Counter As Integer Counter = 0 For Each x In Worksheets Counter = Counter + 1 If Counter = 1 Dann GoTo Donothing With ActiveCell .Value = x.Name .Hyperlinks.Add ActiveCell, "", x.Name & "!A1", TextToDisplay:=x.Name, ScreenTip:="Klicken Sie hier, um zum Arbeitsblatt zu gelangen" Mit Arbeitsblättern (Zähler) .Range("A1").Value = "Zurück zu " & ActiveSheet.Name .Hyperlinks.Add Sheets(x.Name).Range("A1"), "", _ "'" & ActiveSheet.Name & "'" & "!" & ActiveCell.Address, _ ScreenTip:="Zurück zu " & ActiveSheet.Name End With End With ActiveCell.Offset(1, 0).Select Donothing: Next x End Sub

Wohin mit diesem Code?

Führen Sie die folgenden Schritte aus, um diesen Code in die Arbeitsmappe einzufügen:

Gehen Sie zur Registerkarte Entwickler und klicken Sie auf Visual Basic. Sie können auch die Tastenkombination verwenden - ALT F11.
- Wenn Sie die Registerkarte Entwickler im Menüband in Excel finden, klicken Sie hier, um zu erfahren, wie Sie sie erhalten.
Auf der linken Seite sollte sich ein Projekt-Explorer-Bereich befinden (wenn er nicht vorhanden ist, verwenden Sie Strg + R, um ihn sichtbar zu machen).
Gehen Sie zu Einfügen und klicken Sie in Modul. Dadurch wird der Arbeitsmappe ein Modul hinzugefügt. Außerdem sehen Sie rechts das Codefenster (mit einem blinkenden Cursor).
Kopieren Sie im Modulcodefenster den obigen Code und fügen Sie ihn ein.

Ausführen des Codes

So führen Sie diesen Code aus:

Gehen Sie zur Registerkarte Entwickler -> Code -> Makros. Dadurch wird das Dialogfeld Makro geöffnet.
Wählen Sie das Makro CreateSummary aus und klicken Sie auf Ausführen.
Dadurch wird das Makro ausgeführt und die Hyperlinks im aktiven Blatt erstellt.

Eine andere Möglichkeit, das Makro auszuführen, besteht darin, eine Schaltfläche/eine Form einzufügen und ihr das Makro zuzuweisen. Um dies zu tun:

Fügen Sie eine Form in das Arbeitsblatt ein. Formatieren Sie die Form wie gewünscht.
Klicken Sie mit der rechten Maustaste darauf und wählen Sie Makro zuweisen.
Wählen Sie im Feld Makro zuweisen das Makro aus, das Sie der Form zuweisen möchten, und klicken Sie auf OK.

Jetzt können Sie einfach auf die Form klicken, um das Makro auszuführen.

Laden Sie die Datei hier herunter

Notiz:

Ich habe die Zelle A1 in jedem Blatt hartcodiert, die mit einem Hyperlink versehen ist, um Sie zurück zum Zusammenfassungsblatt zu bringen. Stellen Sie sicher, dass Sie es entsprechend ändern, wenn Sie in jedem Blatt bereits etwas in der A1-Zelle haben.
Die Zusammenfassung erstellt keinen Hyperlink für sich selbst (was sinnvoll ist, da Sie sich bereits auf diesem Blatt befinden).
Führen Sie diesen Code aus, wenn das Zusammenfassungsarbeitsblatt das aktive Arbeitsblatt ist.
Möglicherweise möchten Sie Formatierungen oder Neuanordnungen hinzufügen. Aber ich hoffe, dieser Code kümmert sich um den schwierigen Teil.
Speichern Sie diese Arbeitsmappe als .xls- oder .xlsm-Erweiterung, da sie ein Makro enthält.

Andere Excel-VBA-Tutorials: