Εάν αλλάξετε τη μορφή αριθμού ενός μεμονωμένου κελιού ή μιας περιοχής κελιών με μακροεντολή VBA, μπορείτε να μορφοποιήσετε πίνακες και εύρη δεδομένων γρήγορα και εύκολα σύμφωνα με τις απαιτήσεις σας, χωρίς ο χρήστης να χρειάζεται να κάνει τίποτα.
Η αλλαγή των μορφών αριθμών σε ένα υπολογιστικό φύλλο Excel είναι εύκολη. Με τον συνδυασμό πλήκτρων CTRL 1 μπορείτε να ανοίξετε το παράθυρο διαλόγου FORMAT CELLS σε όλες τις εκδόσεις του Excel και να αλλάξετε την εμφάνιση των κελιών σας.
Τι κάνετε όμως όταν θέλετε να αλλάξετε τη μορφή των κελιών μέσα από μια μακροεντολή; Το παρακάτω σχήμα δείχνει έναν πίνακα με δεδομένα στις στήλες Α και Β.
Θέλετε να επαναπροσδιορίσετε τη μορφή αριθμών για το εύρος B2: B25 και να χρησιμοποιήσετε μια εμπορική μορφή με δύο δεκαδικά ψηφία. Χρησιμοποιήστε την ακόλουθη μακροεντολή:
Sub LegeZahlenformatFest ()
Εύρος ("B2: B25"). NumberFormat = "#, ## 0,00"
Τέλος υπο
Μετά την έναρξη, η λίστα θα επαναδιαμορφωθεί. Οι αριθμοί στο εύρος B2: B25 έχουν λάβει νέες μορφές αριθμών. Το παρακάτω σχήμα δείχνει το αποτέλεσμα:
Για να εισαγάγετε τη μακροεντολή, πατήστε ALT F11 στο Excel για να εμφανιστεί ο επεξεργαστής VBA. Επιλέξτε την εντολή INSERT - MODULE στον επεξεργαστή VBA και εισαγάγετε τη μακροεντολή. Για να ξεκινήσετε τη μακροεντολή, ενεργοποιήστε τον συνδυασμό πλήκτρων ALT F8 στο Excel. Οι δύο συντομεύσεις πληκτρολογίου για την εκκίνηση του προγράμματος επεξεργασίας VBA και η μακροεντολή λειτουργούν σε όλες τις εκδόσεις του Excel.
Στη μακροεντολή, μπορείτε να χρησιμοποιήσετε την αναφορά "B2: B25" για να καθορίσετε σε ποια περιοχή κελιών πρόκειται να δοθεί νέα μορφή αριθμού. Η περιοχή στο τρέχον ενεργό φύλλο εργασίας είναι πάντα μορφοποιημένη. Εάν θέλετε να μορφοποιήσετε μόνο ένα κελί, συμπεριλάβετε μόνο μια διεύθυνση κελιού σε αυτήν την αναφορά.
