Ας πάρουμε ένα παράδειγμα για να καταλάβουμε πώς και πού μπορούμε να μορφοποιήσουμε το κελί για λογιστική.
Διαθέτουμε δεδομένα ποσότητας προϊόντος στην περιοχή A1: B9 στην οποία η στήλη A περιέχει όνομα προϊόντος και η στήλη Β περιέχει ποσότητα. Θέλουμε να μορφοποιήσουμε το εύρος ποσών ως λογιστικό. Η μορφή τοποθετεί το σύμβολο του δολαρίου στα αριστερά και προσθέστε δύο δεκαδικά ψηφία στον αριθμό. Αυτή η μορφή προορίζεται για την εμφάνιση χρημάτων.
Για να γράψετε τη μακροεντολή, ακολουθήστε τα παρακάτω βήματα:-
- Ανοίξτε τη σελίδα VBA πατήστε το πλήκτρο Alt+F11.
- Εισαγάγετε μια ενότητα.
- Γράψτε τον παρακάτω κωδικό:
Sub FormatAccounting ()
Dim Sh As φύλλο εργασίας
Ορίστε Sh = ThisWorkbook. Φύλλα (1)
Sh.Range ("B2: B9"). NumberFormat = "_ ($*#, ## 0,00 _); _ ($*(#, ## 0,00); _ ($*" "_" "?? _ ); _ (@_) "
Τέλος υπο
Επεξήγηση κώδικα:-
Πρώτα δώσαμε το θέμα για τον κώδικα, μετά είχαμε ορίσει όλες τις μεταβλητές, αφού είχαμε ορίσει το εύρος όπου θέλουμε να βάλουμε τη λογιστική μορφή.
Όταν εκτελέσετε τη μακροεντολή πατώντας το πλήκτρο F5, θα έχετε το επιθυμητό αποτέλεσμα στο Microsoft Excel.
@ www.excelforum ένας από τους χρήστες έχει ρωτήσει σχετικά με την παρόμοια ερώτηση:-
$ Σύνδεση μπροστά από την τιμή
Έχω αυτόν τον κωδικό, αλλά δεν μπορώ να καταλάβω πώς μπορώ να βάλω μια πινακίδα δολαρίου μπροστά. Ο παρακάτω κώδικας δεν βάζει ένα σύμβολο $ μπροστά από αυτήν την τιμή 2220.45-. Θα ήθελα να εμφανίζεται ως $ 2220,45-
Για να ελέγξετε τη λύση, κάντε κλικ εδώ.
http://www.excelforum.com/excel-programming-vba-macros/1085312-sign-in-front-of-value.html
Λήψη - Διαμόρφωση λογιστικού αριθμού μέσω VBA - xlsm