Πώς δείχνετε τους τύπους σε μία σελίδα στο Excel 2007;

Δεν υπάρχει ένα ενσωματωμένο χαρακτηριστικό στο Excel 2007 (ή οποιαδήποτε έκδοση) για να δείξει * όλους τους τύπους από ένα ολόκληρο βιβλίο εργασίας σε μία σελίδα. Το πλησιέστερο που μπορείτε να λάβετε περιλαμβάνει μερικές διαφορετικές προσεγγίσεις, το καθένα με περιορισμούς:

1. Χρησιμοποιώντας "Εμφάνιση τύπων" και εκτύπωση:

* απλούστερη, αλλά περιορισμένη: Ενεργοποιήστε τα "Εμφάνιση τύπων" (καρτέλα τύπων> Εμφάνιση τύπων). Στη συνέχεια, εκτυπώστε τα φύλλα. Αυτό θα δείξει τους τύπους * όπως εμφανίζονται στα κύτταρα * σε κάθε φύλλο. Εάν έχετε πολλά φύλλα, αυτό θα απαιτήσει πολλαπλές σελίδες.

2. Αντιγραφή και επικόλληση:

* Περισσότερος έλεγχος, αλλά εγχειρίδιο: Επιλέξτε όλα τα κύτταρα που περιέχουν τύπους (Ctrl+A), αντιγράψτε τα (Ctrl+C) και επικολλήστε τα σε ένα νέο φύλλο (Ctrl+V). Αυτό θα δείξει μόνο τους τύπους, χωρίς τα αποτελέσματα. Μπορεί να χρειαστεί να ρυθμίσετε τα πλάτη της στήλης για να δείτε όλους τους τύπους. Αυτό εξακολουθεί να απαιτεί πολλαπλές σελίδες για ένα μεγάλο βιβλίο εργασίας.

3. VBA Macro (πιο ισχυρή, αλλά απαιτεί κωδικοποίηση):

* πιο αποτελεσματικό για μεγάλα βιβλία εργασίας: Μια μακροεντολή VBA μπορεί να βρει μέσα από όλα τα φύλλα στο βιβλίο εργασίας σας, να συλλέξει τους τύπους και να τα συνοπτεί σε μια ενιαία συμβολοσειρά. Αυτή η συμβολοσειρά μπορεί στη συνέχεια να γραφτεί σε ένα μόνο κελί (ή πολλαπλά κελιά εάν η συμβολοσειρά είναι πολύ μεγάλη) σε ένα νέο φύλλο. Αυτός είναι ο μόνος τρόπος για να * εγγυηθεί * να πάρει όλες τις φόρμουλες σε μια σελίδα, ειδικά για πολύ μεγάλα βιβλία εργασίας. Ωστόσο, αυτό απαιτεί την κατανόηση του προγραμματισμού VBA. Ακολουθεί ένα βασικό παράδειγμα:

`` `vba

Sub showAllFormulas ()

Dim Ws ως φύλλο εργασίας, strformulas ως συμβολοσειρά

Για κάθε WS σε αυτό το βιβλίο.

strformulas =strformulas &ws.name &":" &vbcrlf

Για κάθε κελί στο Ws.UsedRange

Αν τότε Cell.hasformula

strformulas =strformulas &cell.address &":" &cell.formula &vbcrlf

Τέλος εάν

Επόμενο κελί

Επόμενο WS

Sheets.add After:=Sheets (Sheets.count) 'Προσθέστε ένα νέο φύλλο

ActivesHeet.Range ("A1"). Value =strformulas

Τερματισμός

`` `

Σημαντικές εκτιμήσεις:

* Μέγεθος φύλλου: Ακόμη και με τη μέθοδο VBA, εάν έχετε εξαιρετικά μεγάλο αριθμό τύπων, ενδέχεται να υπερβαίνει την χωρητικότητα μιας σελίδας. Μπορεί να χρειαστεί να εξετάσετε το ενδεχόμενο να χωρίσετε την έξοδο ή να χρησιμοποιήσετε διαφορετική προσέγγιση μορφοποίησης (π.χ. μικρότερη γραμματοσειρά).

* μορφοποίηση: Η έξοδος Macro VBA θα είναι απλό κείμενο. Θα χάσετε οποιαδήποτε πρωτότυπη μορφοποίηση κυττάρων.

* Κυκλικές αναφορές: Η μακροεντολή μπορεί να μην χειριστεί με ακρίβεια τις κυκλικές αναφορές.

* Χειρισμός σφαλμάτων: Ο παρεχόμενος κώδικας VBA είναι βασικός. Μια πιο ισχυρή μακροεντολή θα περιλαμβάνει χειρισμό σφαλμάτων.

Η καλύτερη προσέγγιση εξαρτάται από το μέγεθος και την πολυπλοκότητα του βιβλίου εργασίας σας και το επίπεδο άνεσής σας με το VBA. Για μικρά έως μεσαίου μεγέθους βιβλία εργασίας, η αντιγραφή και η επικόλληση ή η χρήση των "τύπων εμφάνισης" μπορεί να αρκεί. Για μεγάλα βιβλία εργασίας, η Macro VBA προσφέρει την πληρέστερη λύση. Θυμηθείτε να αποθηκεύσετε ένα αντίγραφο ασφαλείας του βιβλίου εργασίας σας πριν εκτελέσετε οποιεσδήποτε μακροεντολές.