Αυτό το σεμινάριο θα δείξει πώς να χρησιμοποιήσετε τη λειτουργία μορφοποίησης.
Λειτουργία μορφοποίησης
Μορφοποίηση αριθμών με προκαθορισμένες μορφές
Η λειτουργία μορφοποίησης μπορεί να μετατρέψει έναν αριθμό σε συμβολοσειρά μορφοποιημένη με προκαθορισμένες ονομαστικές αριθμητικές μορφές. Αυτές οι προκαθορισμένες μορφές είναι Νόμισμα, Σταθερό, Τυπικό, Ποσοστό, Επιστημονικό, Ναι/Όχι, Σωστό/Λάθος και Ενεργοποίηση/Απενεργοποίηση.
| 12345678910111213141516171819202122232425262728293031 | Sub FormatExample_1 ()MsgBox Format (1234567.8) 'Αποτέλεσμα είναι: 1234567.8«Η μορφή αφήνει τον αριθμό ως έχειMsgBox Format (1234567.8, "Νόμισμα") 'Αποτέλεσμα είναι: $ 1.234.567,80«Το νόμισμα χρησιμοποιεί τις ρυθμίσεις νομίσματος συστήματοςMsgBox Format (1234567.8, "Fixed") 'Αποτέλεσμα είναι: 1234567.80«Διορθώθηκε: Τουλάχιστον ένα ψηφίο πριν από το δεκαδικό ψηφίο και'χρησιμοποιεί ρυθμίσεις συστήματος για το δεκαδικό μέροςMsgBox Format (1234567.8, "Standard") 'Αποτέλεσμα είναι: 1.234.567,80«Τυπικό: Χιλιάδες διαχωριστές και τυπικό σύστημαMsgBox Format (1234567.8, "Ποσοστό") 'Αποτέλεσμα είναι: 123456780.00%«Ποσοστό, πολλαπλασιάζεται επί 100 με % και τυπικό σύστημα.MsgBox Format (1234567.8, "Επιστημονικό") 'Αποτέλεσμα είναι: 1.23E+06'Επιστημονική σημειογραφίαMsgBox Format (1234567.8, "Ναι/Όχι") 'Αποτέλεσμα είναι: Ναι«Όχι αν ο αριθμός είναι μηδένMsgBox Format (1234567.8, "True/False") 'Το αποτέλεσμα είναι: True«Λάθος αν ο αριθμός είναι ίσος με το μηδένMsgBox Format (1234567.8, "On/Off") "Το αποτέλεσμα είναι: On'Ανενεργό αν ο αριθμός είναι μηδενικόςΤέλος υπο |
Μορφοποίηση αριθμών με μορφές που καθορίζονται από το χρήστη
Η συνάρτηση μορφοποίησης μπορεί να μετατρέψει έναν αριθμό σε συμβολοσειρά, μορφοποιημένες αριθμητικές μορφές που ορίζονται από το χρήστη. 0 είναι ένα ψηφιακό σύμβολο κράτησης θέσης που εμφανίζει ένα ψηφίο ή μηδέν. # είναι ένα ψηφιακό σύμβολο κράτησης θέσης που εμφανίζει ένα ψηφίο ή τίποτα. Μια τελεία (. Το κείμενο μπορεί να προστεθεί σε μορφή χρησιμοποιώντας διπλά εισαγωγικά ("") και ένας μόνο χαρακτήρας μπορεί να προστεθεί εάν χρησιμοποιείται μετά από ανάστροφη ανάστροφη (\).
| 1234567891011 | Υπομορφή Υποδείγματος_2 ()Μορφή MsgBox (7.8, "000.00") 'Το αποτέλεσμα είναι: 007.80MsgBox Format (12347.8356, "000.00") 'Αποτέλεσμα είναι: 12347.84Μορφή MsgBox (7.8, "###. ##") 'Το αποτέλεσμα είναι: 7.8MsgBox Format (12347.8356, "###. ##") 'Αποτέλεσμα είναι: 12347.84Μορφή MsgBox (7.8, "\ $. 00") 'Το αποτέλεσμα είναι: $ 7.80MsgBox Format (1237.835, "ABA0.00") 'Αποτέλεσμα είναι: ABA1237.84Μορφή MsgBox (12347.8356, "000.00%") "Το αποτέλεσμα είναι: 1234783.56%Μορφή MsgBox (12347.8356, " %000.00") "Το αποτέλεσμα είναι: %12347.84Τέλος υπο |
Μορφοποίηση αριθμών ανάλογα με τις τιμές
Η λειτουργία μορφοποίησης μπορεί να έχει διαφορετικές ενότητες χρησιμοποιώντας διαφορετικούς κανόνες μορφής για θετικούς αριθμούς, αρνητικούς αριθμούς, μηδέν και μηδέν. Αυτά τα τμήματα χωρίζονται με ερωτηματικό.
| 1234567 | Sub FormatExample_3 ()Μορφή MsgBox (7.8, "000.00; (000.00); \ z \ e \ r \ o; τίποτα") 'Αποτέλεσμα είναι: 007.80Μορφή MsgBox (-7.8, "000.00; (000.00); \ z \ e \ r \ o; τίποτα") 'Το αποτέλεσμα είναι: (007.80)Μορφή MsgBox (0, "000.00; (000.00); \ z \ e \ r \ o; τίποτα") 'Το αποτέλεσμα είναι: μηδένΜορφή MsgBox (Null, "000.00; (000.00); \ z \ e \ r \ o; τίποτα") 'Αποτέλεσμα είναι: τίποταΤέλος υπο |
Μορφοποίηση ημερομηνιών με προκαθορισμένες μορφές
Η λειτουργία μορφοποίησης μπορεί να μορφοποιήσει ημερομηνίες με διαφορετικές προκαθορισμένες μορφές. Αυτές οι μορφές είναι μεγάλες, μεσαίες και σύντομες ημερομηνίες και επίσης μεγάλες, μεσαίες και σύντομες.
| 1234567891011121314 | Sub FormatExample_4 ()Dim DateEx ως ημερομηνίαDateEx = #4/18/2020 7:35:56 ΜΜ #MsgBox Format (DateEx, "General Date") 'Αποτέλεσμα είναι: 18/4/2020 7:35:56 μ.μ.MsgBox Format (DateEx, "Long Date") 'Αποτέλεσμα είναι: Σάββατο, 18 Απριλίου 2022MsgBox Format (DateEx, "Medium Date") 'Αποτέλεσμα είναι: 18-Απρ-20Μορφή MsgBox (DateEx, "Short Date") 'Αποτέλεσμα είναι: 18/4/2020MsgBox Format (DateEx, "Long Time") 'Αποτέλεσμα είναι: 7:35:56 μ.μ.MsgBox Format (DateEx, "Medium Time") 'Αποτέλεσμα είναι: 07:35 μ.μMsgBox Format (DateEx, "Short Time") 'Αποτέλεσμα είναι: 19:35Τέλος υπο |
Μορφοποίηση ημερομηνιών με μορφές που καθορίζονται από το χρήστη
Η λειτουργία μορφοποίησης μπορεί να μορφοποιήσει ημερομηνίες με μορφές που ορίζονται από το χρήστη. Χαρακτήρες όπως d, m, y, w, q μπορούν να χρησιμοποιηθούν για τη δημιουργία προσαρμοσμένων μορφών ημερομηνίας.
| 123456789101112131415161718192021222324 | Sub FormatExample_5 ()Dim DateEx ως ημερομηνίαDateEx = #4/18/2020 7:35:56 ΜΜ #Μορφή MsgBox (DateEx, "m/d/yy") 'Αποτέλεσμα είναι: 18/4/2020Μορφή MsgBox (DateEx, "mm-dd-yy") 'Αποτέλεσμα είναι: 04-18-2020Μορφή MsgBox (DateEx, "mmm-dd-yy") 'Αποτέλεσμα είναι: Απρ-18-2020Μορφή MsgBox (DateEx, "mmmm-dd-yy") 'Αποτέλεσμα είναι: Απρίλιος-18-2020Μορφή MsgBox (DateEx, "mm-ddd-yy") 'Αποτέλεσμα είναι: 04-Sat-2020Μορφή MsgBox (DateEx, "mm-dddd-yy") 'Αποτέλεσμα είναι: 04-Σάββατο-2020Μορφή MsgBox (DateEx, "y")Το αποτέλεσμα είναι: 109«αριθμός ημερών στο έτος 1-366Μορφή MsgBox (DateEx, "ww")Το αποτέλεσμα είναι: 16«αριθμός εβδομάδων στο έτος 1-52Μορφή MsgBox (DateEx, "q")Το αποτέλεσμα είναι: 2'τρίμηνο το έτος 1-4Τέλος υπο |
Χαρακτήρες όπως οι συνδυασμοί h, n, s και am, pm μπορούν να χρησιμοποιηθούν για τη δημιουργία προσαρμοσμένων μορφών ώρας.
| 123456789101112 | Sub FormatExample_6 ()Dim DateEx ως ημερομηνίαDateEx = #4/18/2020 7:06:05 ΜΜ #Μορφή MsgBox (DateEx, "h: n: s") 'Αποτέλεσμα είναι: 19: 6: 5Μορφή MsgBox (DateEx, "hh: nn: ss") 'Αποτέλεσμα είναι: 19:06:05Μορφή MsgBox (DateEx, "hh: nn: ss am/pm") 'Αποτέλεσμα είναι: 07:06:05 μ.μ.Μορφή MsgBox (DateEx, "hh: nn: ss AM/PM") 'Αποτέλεσμα είναι: 07:06:05 μ.μ.Μορφή MsgBox (DateEx, "hh: nn: ss a/p") 'Αποτέλεσμα είναι: 07:06:05 μ.Μορφή MsgBox (DateEx, "hh: nn: ss A/P") 'Αποτέλεσμα είναι: 07:06:05 PΤέλος υπο |
Μορφή για καλύτερη αναγνωσιμότητα
Η λειτουργία μορφοποίησης μπορεί να μορφοποιήσει συμβολοσειρές ή αριθμούς για καλύτερη αναγνωσιμότητα. Το @ είναι ένα σύμβολο κράτησης θέσης που χρησιμοποιείται για την εμφάνιση ενός χαρακτήρα ή διαστήματος. & είναι ένα σύμβολο κράτησης θέσης που χρησιμοποιείται για την εμφάνιση ενός χαρακτήρα ή τίποτα. ! μπορεί να χρησιμοποιηθεί για τη χρήση θέσεων κράτησης θέσης από αριστερά προς τα δεξιά και μπορεί να χρησιμοποιηθεί για την επιβολή πεζών ή κεφαλαίων. Μπορεί να είναι χρήσιμο για τη μορφοποίηση αριθμών τηλεφώνου ή άλλων μεγάλων αριθμών χωρίς αλλαγή της αρχικής τιμής.
| 12345678910111213141516171819202122 | Sub FormatExample_7 ()Dim StrEx As StringStrEx = "ABCdef"MsgBox Format (StrEx, "-@@@-@@-@@") 'Αποτέλεσμα είναι:-AB-Cd-efMsgBox Format (StrEx, "-&&&-&&-&&") 'Αποτέλεσμα είναι: -AB-Cd-ef'Ξεκινά από δεξιά προς τα αριστερά.MsgBox Format (StrEx, "-@@@-@@-@@-@@") 'Αποτέλεσμα είναι:--AB-Cd-efMsgBox Format (StrEx, "-&&&-&&-&&-&&") 'Αποτέλεσμα είναι: --AB-Cd-ef'Ξεκινά από δεξιά προς τα αριστερά. Όταν εκτός χαρακτήρων, το @ προσθέτει κενά και & δεν προσθέτει τίποταMsgBox Format (StrEx, "!-@@@-@@-@@-@@") 'Αποτέλεσμα είναι: -ABC-de-f-MsgBox Format (StrEx, "!-&&&-&&-&&-&&") 'Αποτέλεσμα είναι: -ABC-de-f'Ξεκινά από αριστερά προς τα δεξιά λόγω του!MsgBox Format (StrEx, ">") 'Αποτέλεσμα είναι: ABCDEFMsgBox Format (StrEx, "<") 'Αποτέλεσμα είναι: abcdefΜορφή MsgBox (1234567890, "@@@-@@@-@@@@") 'Αποτέλεσμα είναι: 123-456-7890MsgBox Format (1234567890, "@@@@-@@@-@@@") 'Αποτέλεσμα είναι: 1234-567-890Τέλος υπο |
Μορφοποίηση προτύπων σε κελιά φύλλου εργασίας
Η λειτουργία μορφοποίησης μπορεί να χρησιμοποιηθεί σε κώδικα VBA και επίσης σε κελιά φύλλων εργασίας. Επιλέξτε το κελί ή την περιοχή κελιών και ακολουθήστε την καταχώρηση μενού Μορφοποίηση κελιών> Προσαρμοσμένο. Υπάρχουν πολλές μορφές που ορίζονται από τον χρήστη και επίσης ο χρήστης μπορεί να δημιουργήσει τις δικές του προσαρμοσμένες μορφές.
Μορφοποίηση προτύπων με τύπο κειμένου
Η λειτουργία μορφοποίησης μπορεί να αλλάξει απευθείας τη μορφή μιας τιμής μέσα στον κώδικα VBA. Μπορούμε επίσης να χρησιμοποιήσουμε τον τύπο κειμένου excel για να έχουμε το ίδιο αποτέλεσμα χρησιμοποιώντας το WorksheetFunction.Text.
| 1234567891011 | Sub FormatExample_8 ()Μορφή MsgBox (7.8, "000.00")«Το αποτέλεσμα είναι: 007.80MsgBox WorksheetFunction.Text (7.8, "000.00")«Το αποτέλεσμα είναι: 007.80Μορφή MsgBox (7.8, "###. ##")Το αποτέλεσμα είναι: 7.8MsgBox WorksheetFunction.Text (7.8, "###. ##")Το αποτέλεσμα είναι: 7.8Τέλος υπο |
