Excel - Ερωτήσεις / Απαντήσεις Ότι έχει σχέση με συναρτήσεις, μορφοποίηση, εκτυπώσεις γραφήματα κτλ. |
| Εργαλεία Θεμάτων | Τρόποι εμφάνισης |
#1
| |||
| |||
Δημιουργία λίστας φύλλων ενός βιβλίου
Καλημέρα σας και συγχαρητήρια για την καλή δουλειά! Η ερώτηση μου είναι: Πως μπορώ χωρίς χρήση VBA να εμφανίσω όλα τα ονόματα των φύλλων ενός βιβλίου Excel σε μια περιοχή ενός φύλλου; Θέλω βάσει αυτών των ονομάτων (που είναι πολλά και αλλάζουν τακτικά) να δημιουργήσω τύπους που θα μου επιστρέψουν αποτελέσματα από τα φύλλα αυτά. Ελπίζω να έγινα κατανοητός. Ευχαριστώ Βασίλης |
#2
| ||||
| ||||
Γεια χαρά Βασίλη! Ο παρακάτω τύπος επιστρέφει το όνομα του Φύλλου1: Κώδικας: =MID(CELL("filename";Φύλλο1!A1);FIND("]";CELL("filename";Φύλλο1!A1))+1;255) θα έχεις μια λίστα με τα ονόματα των φύλλων η οποία θα ενημερώνεται αυτόματα με κάθε μετονομασία τους, όχι όμως και με τη διαγραφή τους ή/και την εισαγωγή νέων. Για να έχεις μια πλήρως ενημερώσιμη λίστα, θα πρέπει αναγκαστικά να καταφύγεις στη VBA. Φιλικά, Γιάννης
__________________ Αν δεν το ρωτούσες, δεν θα το μαθαίναμε ποτέ...! ----------------------------------------------- Τελικά η γνώση, αντίθετα με ό,τι μέχρι σήμερα πίστευα, είναι η φυλακή της σκέψης. Όταν η αφετηρία είναι η ελεύθερη σκέψη, δεν χρειάζεται πλέον να φτάσεις πουθενά! |
#3
| ||||
| ||||
Γεια σας! Μπορούμε να χρησιμοποιήσουμε την (πολύ παλιά) συνάρτηση GET.WORKBOOK() που μας επιστρέφει τα ονόματα των φύλλων σε πίνακα (Array). Ορίζουμε λοιπόν ένα νέο όνομα πχ. SheetNames (Στην Excel 2007 - στην καρτέλλα Τύποι > Ορισμός ονόματος), όπου στο πεδίο "Αναφορά σε" περνάμε τη συνάρτηση: =GET.WORKBOOK(1+0*NOW()) Το +0*NOW() προκαλεί επανυπολογισμό του φύλλου (αναγκαιο αφού οι συναρτήσεις τέτοιου είδους δεν συμπεριλαμβάνονται όπως θα έπρεπε στο σοφό κατά τ άλλα σύστημα υπολογισμού της Excel). Κατόπιν, σε κάποιο κελί χρησιμοποιούμε τον τύπο: Κώδικας: =IFERROR(MID(INDEX(SheetNames;ROWS($1:1));FIND("]";INDEX(SheetNames;ROWS($1:1)))+1;31);"") Γενικά, η χρήση της VBA αποτελεί μια πιο προσιτή μέθοδο αφού υποστηρίζεται επίσημα (τώρα και στο εγγύς μέλλον τουλάχιστον) από τη Microsoft και είναι κατά πολύ και πληρέστερη. Τέλος, προσπάθησε όπως ανέφερε και ο Γιάννης να εισέλθεις στο κεφάλαιο VBA μιας και οι γνώσεις σου στην Excel είναι καλές. Φιλικά Τάσος
__________________ Ms-Office Development Team Ανάπτυξη επαγγελματικών εφαρμογών |
#4
| |||
| |||
Καλημέρα. Σας ευχαριστώ πολύ για τις απαντήσεις σας! Και οι δύο λύσεις λειτουργούν σωστά. Θα πρέπει να μελετήσω την VBA αλλά πρώτα θα πρέπει να βρω το χρόνο... Με εκτίμηση Βασίλης |
« Προηγούμενο Θέμα
|
Επόμενο Θέμα »
| |
Παρόμοια Θέματα | ||||
Θέμα | Δημιουργός | Forum | Απαντήσεις | Τελευταίο Μήνυμα |
[VBA] Κλείδωμα - Ξεκλείδωμα όλων των φύλλων ενός βιβλίου | AIAS | Excel - Ερωτήσεις / Απαντήσεις | 7 | 19-12-15 20:12 |
[Συναρτήσεις] Ενημέρωση μιας λίστας από μια άλλη λίστα ενός άλλου φύλλου εργασίας | labpanag | Excel - Ερωτήσεις / Απαντήσεις | 2 | 06-12-12 16:14 |
[ Φόρμες ] Αλλαγή Περιεχομένων ενός Πλαισίου Λίστας με Ομάδα Επιλογής | ΤΖΙΜΗΣ | Access - Ερωτήσεις / Απαντήσεις | 4 | 01-11-11 15:38 |
[Γενικά] Δημιουργία κουμπιού και δημιουργία νέας λίστας | sethii | Excel - Ερωτήσεις / Απαντήσεις | 3 | 31-03-11 07:52 |
[VBA] Δημιουργία καθαρού βιβλίου | Flashgordon61 | Excel - Ερωτήσεις / Απαντήσεις | 2 | 02-11-10 09:28 |
Η ώρα είναι 12:42.