Στο προηγούμενο άρθρο μου, είχα εξηγήσει πώς να μετατρέψετε έναν αριθμό σε λέξεις στο Excel χρησιμοποιώντας VBA. Είχα γράψει αρκετές γραμμές κώδικα για να το πετύχω. Αλλά δεν είχα φανταστεί ποτέ ότι μπορούμε να μετατρέψουμε αριθμούς σε λέξεις χρησιμοποιώντας απλά τύπους excel. Αλλά ένας από τους χρήστες του Excelforum το έκανε. Δεν είχα φανταστεί ποτέ ότι μπορούσαμε να μετατρέψουμε τους αριθμούς σε λέξεις.
Αυτός ο τύπος χρησιμοποιείται για τη μετατροπή ενός αριθμού σε αμερικανικό νόμισμα. Αυτός ο τύπος μπορεί να μετατρέψει αριθμούς από σεντ εύρους σε δισεκατομμύρια. Ο αριθμός μπορεί επίσης να έχει δύο δεκαδικά ψηφία.
Αυτός ο χρήστης με Id HaroonSid έγραψε μια τρελή φόρμουλα. Ο τύπος είναι μια σελίδα και αν την αναφέρω εδώ τώρα, θα καλύψει ολόκληρη την ανάρτηση. Έτσι, το ανέφερα στο τέλος της ανάρτησης. Μπορείτε να κατεβάσετε το αρχείο excel παρακάτω για να ελέγξετε τον τύπο.
Αριθμός στις λέξεις
Ο τύπος είναι πολύ μακρύς για να εξηγήσω, αλλά μπορώ να εξηγήσω τη λογική. Αυτός ο τύπος καθορίζει πόσο καιρό είναι ο αριθμός. Στη συνέχεια, χρησιμοποιεί τη συνάρτηση CHOOSE για να αντικαταστήσει τους αριθμούς με τις λέξεις. Αλλά αυτό δεν είναι τόσο εύκολο. Αυτός ο τύπος προσδιορίζει μία, δεκάδες, εκατοντάδες, χιλιάδες, εκατομμύρια και δισεκατομμύρια. Προσδιορίζει ποιος αριθμός βρίσκεται σε ποια ενότητα. Μια άλλη πολυπλοκότητα είναι αυτή. Ο αριθμός 12 μπορεί να είναι ένα ή δύο σε μεγάλους αριθμούς ή Δώδεκα. Αυτό προσθέτει πολλή πολυπλοκότητα. Αλλά αυτός ο άνθρωπος μπόρεσε να λύσει αυτήν την πολυπλοκότητα και να κάνει αυτόν τον τύπο να λειτουργήσει αποτελεσματικά.
Τώρα αναφέρω τον τύπο. Αυτός ο τύπος ισχύει για το Β2. Οποιοσδήποτε αριθμός γραμμένος στο Β2 θα μετατραπεί σε λέξεις. Αυτός ο τύπος μετατρέπει τους αριθμούς σε δολάρια αμερικανικού νομίσματος, αλλά μπορείτε να τον προσαρμόσετε ώστε να μετατρέπεται σε οποιοδήποτε νόμισμα ή μονάδα, απλά βρίσκοντας και αντικαθιστώντας τα "Δολάρια" και "Σεντ". Για παράδειγμα, εάν θέλετε να μετατρέψετε αριθμούς σε ρουπία Ινδίας και Paise, απλά βρείτε και αντικαταστήστε.
Κρατήστε λοιπόν την καρέκλα σας. Εδώ είναι ο τύπος.
Τύπος για τη μετατροπή αριθμού σε λέξεις:
| = ΑΝ (((ΦΑΚΟΣ (ΔΑΠΕΔΟΣ (Β2,1)) = 13, ΔΑΠΕΔΟΣ (Β2,1) 1, ΕΠΙΛΟΓΗ (ΜΕΣΑ (ΚΕΙΜΕΝΟ (ΕΝΤ (Β2), ΑΝΑΠΤΥΞΗ (0,12)), 3,1) +1 , "", "-ένα", "-δύο", "-τρία", "-τέσσερα", "-πέντε", "-έξι", "-επτά", "-οκτώ", "-εννέα"), ΑΝ (ΤΙΜΗ (MID (ΚΕΙΜΕΝΟ (INT (B2)), REPT (0,12)), 2,1)) = 0, ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (B2), REPT (0,12)), 3, 1) +1, "", "ένα", "δύο", "τρία", "τέσσερα", "πέντε", "έξι", "επτά", "οκτώ", "εννέα"), "")), ΑΝ (B2> = 10^9, "δισεκατομμύρια", ""), ΕΠΙΛΟΓΗ (MID (ΚΕΙΜΕΝΟ (INT (B2), REPT (0,12)), 4,1) +1, "", "εκατό" , "διακόσια", "τριακόσια", "τετρακόσια", "πεντακόσια", "εξακόσια", "επτακόσια", "οκτακόσια", "εννιακόσια"), ΕΠΙΛΟΓΗ (ΜΕΤΑ (ΚΕΙΜΕΝΟ (INT ( B2), REPT (0,12)), 5,1) +1, "", ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (B2), REPT (0,12)), 6,1) +1, "δέκα" , «έντεκα», «δώδεκα», «δεκατρείς», «δεκατέσσερα», «δεκαπέντε», «δεκαέξι», «δεκαεπτά», «δεκαοκτώ», «δεκαεννιά»), «είκοσι», «τριάντα», «σαράντα», "πενήντα", "εξήντα", "εβδομήντα", "ογδόντα", "ενενήντα"), ΕΑΝ (ΤΙΜΗ (MID (TEXT (INT (B2), REPT (0,12))), 5,1))> 1, ΕΠΙΛΟΓΗ (MID (TEXT (INT (B2), REPT (0,12)), 6,1) +1, "", "-ένα", "-δύο", "-τρία", "-τέσσερα", " -πέντε ","-έξι ","-επτά ","-οκτώ ","-εννέα "), IF (VALUE (MID (TEXT (INT (B2)), REPT (0,12 )), 5,1)) = 0, ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (B2), REPT (0,12)), 6,1) +1, "", "one", "two", "three "," τέσσερα "," πέντε "," έξι "," επτά "," οκτώ "," εννέα ")," ")), ΑΝ (ΤΙΜΗ (MID (ΚΕΙΜΕΝΟ (ΚΕΙΜΕΝΟ (INT (B2)), REPT (0,12 )), 4,3))> 0, "εκατομμύρια", ""), ΕΠΙΛΟΓΗ (MID (ΚΕΙΜΕΝΟ (INT (B2), REPT (0,12)), 7,1) +1, "", "ένα εκατό »,« διακόσια »,« τριακόσια »,« τετρακόσια »,« πεντακόσια »,« εξακόσια »,« επτακόσια »,« οκτακόσια »,« εννιακόσια »), ΕΠΙΛΟΓΗ (MID (ΚΕΙΜΕΝΟ (ΚΕΙΜΕΝΟ ( INT (B2), REPT (0,12)), 8,1) +1, "", ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (B2), REPT (0,12)), 9,1) +1, " δέκα »,« έντεκα »,« δώδεκα »,« δεκατρία »,« δεκατέσσερα »,« δεκαπέντε »,« δεκαέξι »,« δεκαεπτά »,« δεκαοκτώ »,« δεκαεννιά »),« είκοσι »,« τριάντα »,« σαράντα "," πενήντα "," εξήντα "," εβδομήντα "," ογδόντα "," ενενήντα "), ΕΑΝ (ΤΙΜΗ (MID (TEXT (INT (B2), REPT (0,12)), 8,1))>> 1, ΕΠΙΛΟΓΗ (MID (ΚΕΙΜΕΝΟ (INT (B2), REPT (0,12)), 9,1) +1, "", "-ένα", "-δύο", "-τρία", "-τέσσερα" , "-πέντε", "-έξι", "-επτά", "-οκτώ", "-εννέα"), IF (VALUE (MID (TEXT (INT (B2), REPT (0,12))), 8, 1)) = 0, ΕΠΙΛΟΓΗ (MID (TEXT (INT (B2), REPT (0,12)), 9,1) +1, "", "ένα", "δύο", "τρία", "τέσσερα" , "πέντε", "έξι", "επτά", "οκτώ", "εννέα"), "")), IF (VALUE (MID (TEXT (INT (B2)), REPT (0,1 2)), 7,3)), "χιλιάδες", ""), ΕΠΙΛΟΓΗ (MID (ΚΕΙΜΕΝΟ (INT (B2), REPT (0,12)), 10,1) +1, "", "εκατό "," διακόσια "," τριακόσια "," τετρακόσια "," πεντακόσια "," εξακόσια "," επτακόσια "," οκτακόσια "," εννιακόσια "), ΕΠΙΛΟΓΗ (MID (TEXT (INT (B2), REPT (0,12)), 11,1) +1, "", ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (B2), REPT (0,12)), 12,1) +1, "δέκα "," έντεκα "," δώδεκα "," δεκατρία "," δεκατέσσερα "," δεκαπέντε "," δεκαέξι "," δεκαεπτά "," δεκαοκτώ "," δεκαεννέα ")," είκοσι "," τριάντα "," σαράντα " , "πενήντα", "εξήντα", "εβδομήντα", "ογδόντα", "ενενήντα"), ΕΑΝ (ΤΙΜΗ (MID (TEXT (INT (B2), REPT (0,12)), 11,1))> 1 , ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (B2), REPT (0,12)), 12,1) +1, "", "-ένα", "-δύο", "-τρία", "-τέσσερα", "-πέντε", "-έξι", "-επτά", "-οκτώ", "-εννέα"), IF (VALUE (MID (TEXT (INT (B2), REPT (0,12))), 11,1 )) = 0, ΕΠΙΛΟΓΗ (MID (ΚΕΙΜΕΝΟ (INT (B2)), REPT (0,12)), 12,1) +1, "", "ένα", "δύο", "τρία", "τέσσερα", "πέντε", "έξι", "επτά", "οκτώ", "εννέα"), ""))), "", "") & ΑΝ (ΔΑΠΕΔΟ (Β2,1)> 1, "δολάρια", "δολάριο ")) & IF (ISERROR (ΒΡΕΙ ((. ", 255)), 255.200)), 2)) = 1, ΕΠΙΛΕΞΤΕ (1*ΑΡΙΣΤΕΡΑ (Τ RIM (MID (SUBSTITUTE (Sheet1! B2, "."), REPT ("", 255)), 255.200)), 2), "δέκα", "είκοσι", "τριάντα", "σαράντα", "πενήντα", "εξήντα", "εβδομήντα", "ογδόντα", "ενενήντα") & "σεντ", "") & ΣΥΝΕΧΕΙΑ (ΕΠΙΛΕΞΤΕ (MID (ΚΕΙΜΕΝΟ (INT (ΑΡΙΣΤΕΡΑ) REPT ("", 255)), 255.200)), 2)), REPT (0,12)), 11,1) +1, "", ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (LEFT (TRIM (MID (SUBSTITUTE) (Φύλλο1! Β2, ".", REPT ("", 255)), 255.200)), 2)), REPT (0,12)), 12,1) +1, "δέκα", "έντεκα", " δώδεκα "," δεκατρία "," δεκατέσσερα "," δεκαπέντε "," δεκαέξι "," δεκαεπτά "," δεκαοκτώ "," δεκαεννιά ") &" λεπτά "," είκοσι "," τριάντα "," σαράντα "," πενήντα "," εξήντα "," εβδομήντα "," ογδόντα "," ενενήντα "), IF (VALUE (MID (TEXT (INT (LEFT (TRIM (MID (SUBSTITUTE (Sheet1! B2,".)), REPT ("", 255)), 255,200)), 2)), REPT (0,12)), 11,1))> 1, ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (LEFT (TRIM (MID (SUBSTITUTE (Sheet1! B2),)) ". ", REPT (" ", 255)), 255.200)), 2)), REPT (0,12)), 12,1) +1," ","-ένα ","-δύο ","-τρία ","-τέσσερα ","-πέντε ","-έξι ","-επτά ","-οκτώ ","-εννέα ") &" σεντ ", ΕΑΝ (ΑΡΙΣΤΕΡΑ (ΠΕΡΙΟΡΙΣΜΟΣ (MID (ΥΠΟΘΕΣΗ (Φύλλο1! Β2) , ".", REPT ("", 255)), 255.200)), 2) = "01", "one cent", IF (LEFT (TRIM (MID (SUBSTITUTE (Sheet1! B2, ".)) "", 255)), 255.200)), 1) = "0", ΕΠΙΛΕΞΤΕ (MID (TEXT (INT (ΑΡΙΣΤΕΡΑ (TRIM (MID (SUBSTITUTE (Sheet1! B2) ".), REPT ("), 255)) , 255,200)), 2)), REPT (0,12)), 12,1) +1, "", "ένα", "δύο", "τρία", "τέσσερα", "πέντε", "έξι" , "επτά", "οκτώ", "εννέα") & "λεπτά", ""))))))) |
Ναι, λοιπόν, αυτός είναι ο τύπος. Πως σας φαίνεται αυτό? Ελπίζω να σας είναι χρήσιμο. Εάν δεν θέλετε να το χρησιμοποιήσετε, χρησιμοποιήστε τη μέθοδο VBA για να μετατρέψετε αριθμούς σε λέξεις. Εάν έχετε αμφιβολίες σχετικά με αυτό το άρθρο ή εάν έχετε άλλες ερωτήσεις που σχετίζονται με το Excel, ρωτήστε το επίσης στην παρακάτω ενότητα σχολίων.
Πώς να μετατρέψετε τον αριθμό σε λέξεις στο Excel σε ρουπίες : Μπορούμε να δημιουργήσουμε έναν προσαρμοσμένο τύπο Excel για τη μετατροπή αριθμών σε λέξεις σε ινδικές ρουπίες. Δημιούργησα αυτήν την προσαρμοσμένη συνάρτηση για τη μετατροπή αριθμών σε λέξεις σε όρους ινδικής ρουπίας. Μπορείτε να κατεβάσετε το αρχείο μακροεντολής
13 Μέθοδοι για την επιτάχυνση του Excel | Το Excel είναι αρκετά γρήγορο για να υπολογίσει 6,6 εκατομμύρια τύπους σε 1 δευτερόλεπτο σε Ιδανικές συνθήκες με κανονική διαμόρφωση υπολογιστή. Αλλά μερικές φορές παρατηρούμε τα αρχεία excel να κάνουν υπολογισμούς πιο αργά από τα σαλιγκάρια. Υπάρχουν πολλοί λόγοι πίσω από αυτήν την πιο αργή απόδοση. Εάν μπορούμε να τα αναγνωρίσουμε, μπορούμε να κάνουμε τους τύπους μας να υπολογίζονται γρηγορότερα.
Κέντρο φύλλου Excel Οριζόντια και κάθετα στη σελίδα του Excel : Το Microsoft Excel σάς επιτρέπει να ευθυγραμμίσετε το φύλλο εργασίας σε μια σελίδα, μπορείτε να αλλάξετε περιθώρια, να καθορίσετε προσαρμοσμένα περιθώρια ή να κεντράρετε το φύλλο εργασίας οριζόντια ή κάθετα στη σελίδα. Τα περιθώρια σελίδας είναι τα κενά κενά μεταξύ των δεδομένων του φύλλου εργασίας και των άκρων της εκτυπωμένης σελίδας
Διαχωρίστε ένα κελί διαγώνια στο Microsoft Excel 2016 : Για διαίρεση κελιών διαγώνια χρησιμοποιούμε τη μορφοποίηση κελιών και εισάγουμε μια διαγώνια διαχωριστική γραμμή στο κελί. Αυτό διαχωρίζει τα κύτταρα διαγώνια οπτικά.
Πώς μπορώ να εισαγάγω ένα σημάδι επιλογής στο Excel 2016 : Για να εισαγάγετε ένα σημάδι ελέγχου στο κελί του Excel χρησιμοποιούμε τα σύμβολα στο Excel. Ορίστε τις γραμματοσειρές σε πτερύγια και χρησιμοποιήστε τον τύπο Char (252) για να λάβετε το σύμβολο ενός σημείου ελέγχου.
Πώς να απενεργοποιήσετε το Scroll Lock στο Excel : Τα πλήκτρα βέλους στο excel μετακινούν το κελί σας πάνω, κάτω, Αριστερά & Δεξιά. Αλλά αυτή η δυνατότητα ισχύει μόνο όταν το Scroll Lock στο Excel είναι απενεργοποιημένο. Scroll Lock στο Excel χρησιμοποιείται για κύλιση πάνω, κάτω, αριστερά και δεξιά στο φύλλο εργασίας σας και όχι στο κελί. Αυτό το άρθρο λοιπόν θα σας βοηθήσει πώς να ελέγξετε την κατάσταση κλειδώματος κύλισης και πώς να την απενεργοποιήσετε;
Τι να κάνετε εάν οι σύνδεσμοι διακοπή του Excel δεν λειτουργούν : Όταν δουλεύουμε με πολλά αρχεία excel και χρησιμοποιούμε τον τύπο για να κάνουμε την εργασία, δημιουργούμε σκόπιμα ή ακούσια συνδέσμους μεταξύ διαφορετικών αρχείων. Οι κανονικοί σύνδεσμοι τύπου μπορούν εύκολα να σπάσουν χρησιμοποιώντας την επιλογή break links.
Δημοφιλή άρθρα:
50 συντομεύσεις Excel για να αυξήσετε την παραγωγικότητά σας | Γίνετε πιο γρήγοροι στην εργασία σας. Αυτές οι 50 συντομεύσεις θα σας κάνουν να εργάζεστε ακόμη πιο γρήγορα στο Excel.
Πώς να χρησιμοποιήσετε τη συνάρτηση Excel VLOOKUP| Αυτή είναι μια από τις πιο δημοφιλείς και δημοφιλείς λειτουργίες του excel που χρησιμοποιείται για την αναζήτηση τιμών από διαφορετικά εύρη και φύλλα.
Πώς να χρησιμοποιήσετε το Excel Λειτουργία COUNTIF| Μετρήστε τιμές με συνθήκες χρησιμοποιώντας αυτήν την εκπληκτική συνάρτηση. Δεν χρειάζεται να φιλτράρετε τα δεδομένα σας για να μετρήσετε συγκεκριμένη τιμή. Η λειτουργία Countif είναι απαραίτητη για την προετοιμασία του ταμπλό σας.
Πώς να χρησιμοποιήσετε τη συνάρτηση SUMIF στο Excel | Αυτή είναι μια άλλη βασική λειτουργία του ταμπλό. Αυτό σας βοηθά να συνοψίσετε τιμές υπό συγκεκριμένες συνθήκες.