Erstellen Sie verlinkte Blatt Liste
Wie wäre es mit einer Liste von Blättern, die jeweils mit ihrem jeweiligen Blattnamen in der Arbeitsmappe verlinkt sind? Nun, dies kann mit dem folgenden Code erfolgen – Sub CreateHyperlinkedSheetList ()
Dim ws As Worksheet Application.ScreenUpdating = False ActiveSheet.Range („A: A“). Löschen Sie die vorhandene Liste für jedes ws in ActiveWorkbook.Worksheets mit ActiveSheet.Range („A“ & Rows.Count) .End (xlUp)