Δημιουργήστε έναν πίνακα περιεχομένων για ένα βιβλίο εργασίας παραθέτοντας τα ονόματα όλων των φύλλων εργασίας σε ένα βιβλίο εργασίας του Excel
Θέλετε να λάβετε μια λίστα με όλα τα φύλλα εργασίας σε ένα βιβλίο εργασίας; Στη συνέχεια, χρησιμοποιήστε μια μακροεντολή VBA. Η ακόλουθη μακροεντολή δημιουργεί ένα νέο φύλλο εργασίας στο ενεργό βιβλίο εργασίας και παραθέτει τα ονόματα όλων των φύλλων το ένα κάτω από το άλλο σε αυτό το φύλλο εργασίας:
Sub ListBlaetter ()
Dim line ως ακέραιος
Dim List ως φύλλο εργασίας
Set List = ActiveWorkbook.Worksheets.Addd
Για γραμμή = 1 Στο ActiveWorkbook.Worksheets.Count
Λίστα. Κελιά (σειρά, 1). Αξία = Φύλλα εργασίας (γραμμή). Όνομα
Επόμενη γραμμή
Τέλος υπο
Μόλις ξεκινήσει, η μακροεντολή δημιουργεί μια λίστα με τα φύλλα εργασίας στα ενεργά βιβλία εργασίας. Αυτή η λίστα βρίσκεται σε νέο φύλλο εργασίας. Το παρακάτω σχήμα δείχνει πώς μπορεί να είναι το αποτέλεσμα:
Για να εισαγάγετε τη μακροεντολή, πατήστε το συνδυασμό πλήκτρων ALT F11 στο Excel. Αυτό καλεί τον επεξεργαστή VBA. Χρησιμοποιήστε την εντολή INSERT - MODULE για να εισαγάγετε ένα κενό φύλλο λειτουργικής μονάδας. Για να ξεκινήσετε τη μακροεντολή, πατήστε το συνδυασμό πλήκτρων ALT F8 στο Excel.
