Μετάβαση στο κύριο περιεχόμενο

Πώς να εξαγάγετε αριθμό μόνο από συμβολοσειρά κειμένου στο Excel;


Μέθοδος 1: Εξαγωγή αριθμού μόνο από συμβολοσειρές κειμένου με τύπο

Ο παρακάτω μακρύς τύπος μπορεί να σας βοηθήσει να εξαγάγετε μόνο τους αριθμούς από τις συμβολοσειρές κειμένου, κάντε το ως εξής:

Επιλέξτε ένα κενό κελί όπου θέλετε να εξάγετε τον εξαγόμενο αριθμό και, στη συνέχεια, πληκτρολογήστε αυτόν τον τύπο: = SUMPRODUCT (MID (0 & A5, LARGE (INDEX (ISNUMBER (- MID (A5, ROW (INDIRECT ("1:" & LEN (A5))), 1)) ROW (INDIRECT ("1:" & LEN (A5)) )), 0), ROW (INDIRECT ("1:" & LEN (A5)))) + 1, 1) * 10 ^ ROW (INDIRECT ("1:" & LEN (A5))) / 10)και, στη συνέχεια, σύρετε τη λαβή πλήρωσης για να συμπληρώσετε το εύρος που χρειάζεστε για να εφαρμόσετε αυτόν τον τύπο. Δείτε το στιγμιότυπο οθόνης:

αριθμοί αποσπάσματος εγγράφων μόνο 2

:

  • 1. A5 αντιπροσωπεύει τα πρώτα δεδομένα που θέλετε να εξαγάγετε αριθμούς μόνο από τη λίστα.
  • 2. Το αποτέλεσμα θα εμφανίζεται ως 0 όταν δεν υπάρχουν αριθμοί στη συμβολοσειρά.

Εξαγωγή αριθμών μόνο από συμβολοσειρές κειμένου:

Με Kutools για Excel'S ΕΚΧΥΛΙΣΜΑΤΑ συνάρτηση, μπορείτε να εξαγάγετε γρήγορα μόνο αριθμούς από τα κελιά συμβολοσειράς κειμένου. Κάντε κλικ για λήψη του Kutools για Excel!

αριθμοί αποσπάσματος εγγράφων μόνο 14


Μέθοδος 2: Εξαγωγή αριθμού μόνο από συμβολοσειρές κειμένου με κωδικό VBA

Εδώ είναι ένας κωδικός VBA που μπορεί επίσης να σας βοηθήσει, κάντε τα εξής:

1. Κρατήστε πατημένο το Alt + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Κλίκ Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε τον ακόλουθο κώδικα στο Μονάδα μέτρησης Παράθυρο.

Κωδικός VBA: Εξαγωγή αριθμού μόνο από συμβολοσειρά κειμένου:

Sub ExtrNumbersFromRange()
    Dim xRg As Range
    Dim xDRg As Range
    Dim xRRg As Range
    Dim nCellLength As Integer
    Dim xNumber As Integer
    Dim strNumber As String
    Dim xTitleId As String
    Dim xI As Integer
    xTitleId = "KutoolsforExcel"
    Set xDRg = Application.InputBox("Please select text strings:", xTitleId, "", Type:=8)
    If TypeName(xDRg) = "Nothing" Then Exit Sub
    Set xRRg = Application.InputBox("Please select output cell:", xTitleId, "", Type:=8)
    If TypeName(xRRg) = "Nothing" Then Exit Sub
    xI = 0
    strNumber = ""
  For Each xRg In xDRg
    xI = xI + 1
    nCellLength = Len(xRg)
    For xNumber = 1 To nCellLength
      If IsNumeric(Mid(xRg, xNumber, 1)) Then
        strNumber = strNumber & Mid(xRg, xNumber, 1)
      End If
    Next xNumber
    xRRg.Item(xI) = strNumber
    strNumber = ""
  Next xRg
End Sub

3. Και μετά, πατήστε F5 για να εκτελέσετε αυτόν τον κωδικό και εμφανίζεται ένα πλαίσιο προτροπής για να υπενθυμίσετε την επιλογή του εύρους κειμένου που θέλετε να χρησιμοποιήσετε, δείτε το στιγμιότυπο οθόνης:

αριθμοί αποσπάσματος εγγράφων μόνο 3

4. Στη συνέχεια, κάντε κλικ στο κουμπί OK, ακολουθεί ένα άλλο πλαίσιο προτροπής, επιλέξτε ένα κελί για έξοδο του αποτελέσματος, δείτε το στιγμιότυπο οθόνης:

αριθμοί αποσπάσματος εγγράφων μόνο 4

5. Επιτέλους, κάντε κλικ στο κουμπί OK κουμπί και όλοι οι αριθμοί στα επιλεγμένα κελιά έχουν εξαχθεί ταυτόχρονα.


Μέθοδος 3: Εξαγωγή αριθμού μόνο από συμβολοσειρά κειμένου με Kutools για Excel

Kutools για Excel έχει επίσης μια ισχυρή λειτουργία που ονομάζεται ΕΚΧΥΛΙΣΜΑΤΑ, με αυτήν τη λειτουργία, μπορείτε να εξαγάγετε γρήγορα μόνο τους αριθμούς από τις αρχικές συμβολοσειρές κειμένου.

Kutools για Excel : με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες

Μετά την εγκατάσταση Kutools για Excel, κάντε τα εξής:

1. Κάντε κλικ σε ένα κελί εκτός από τη συμβολοσειρά κειμένου όπου θα βάλετε το αποτέλεσμα, δείτε το στιγμιότυπο οθόνης:

αριθμοί αποσπάσματος εγγράφων μόνο 5

2. Στη συνέχεια κάντε κλικ στο κουμπί Kutools > Λειτουργίες Kutools > Κείμενο > ΕΚΧΥΛΙΣΜΑΤΑ, δείτε το στιγμιότυπο οθόνης:

αριθμοί αποσπάσματος εγγράφων μόνο 6

3. Στην Επιχειρήματα Λειτουργίας διαλόγου, επιλέξτε ένα κελί που θέλετε να εξαγάγετε τους αριθμούς από το Κείμενο πλαίσιο κειμένου και μετά εισαγάγετε αληθής or ψευδής μέσα στο N πλαίσιο κειμένου, δείτε το στιγμιότυπο οθόνης:

αριθμοί αποσπάσματος εγγράφων μόνο 7

Note: η διένεξη N είναι ένα προαιρετικό στοιχείο, εάν εισάγετε αληθής, θα επιστρέψει τους αριθμούς ως αριθμητικά, εάν εισαγάγετε ψευδής, θα επιστρέψει τους αριθμούς ως μορφή κειμένου, η προεπιλογή είναι ψευδής, ώστε να μπορείτε να τον αφήσετε κενό.

4. Και στη συνέχεια κάντε κλικ στο κουμπί OK, οι αριθμοί έχουν εξαχθεί από το επιλεγμένο κελί και, στη συνέχεια, σύρετε τη λαβή πλήρωσης προς τα κάτω στα κελιά που θέλετε να εφαρμόσετε αυτήν τη λειτουργία, θα λάβετε το ακόλουθο αποτέλεσμα:

αριθμοί αποσπάσματος εγγράφων μόνο 8

Κάντε κλικ για λήψη και δωρεάν δοκιμή Kutools για Excel τώρα!


Μέθοδος 4: Εξαγωγή δεκαδικού αριθμού μόνο από συμβολοσειρά κειμένου με τύπο

Εάν οι συμβολοσειρές κειμένου που περιλαμβάνουν ορισμένους δεκαδικούς αριθμούς στο φύλλο εργασίας σας, πώς θα μπορούσατε να εξαγάγετε μόνο τους δεκαδικούς αριθμούς από τις συμβολοσειρές κειμένου;

Ο παρακάτω τύπος μπορεί να σας βοηθήσει να εξαγάγετε τους δεκαδικούς αριθμούς από τις συμβολοσειρές κειμένου γρήγορα και εύκολα.

Εισαγάγετε αυτόν τον τύπο:=LOOKUP(9.9E+307,--LEFT(MID(A5,MIN(FIND({1,2,3,4,5,6,7,8,9,0}, $A5&"1023456789")),999),ROW(INDIRECT("1:999")))), Και, στη συνέχεια, συμπληρώστε τη λαβή στα κελιά που θέλετε να περιέχει αυτόν τον τύπο, όλοι οι δεκαδικοί αριθμοί έχουν εξαχθεί από τις συμβολοσειρές κειμένου, δείτε το στιγμιότυπο οθόνης:

αριθμοί αποσπάσματος εγγράφων μόνο 13


Εξαγάγετε τον αριθμό μόνο από συμβολοσειρές με το Kutools για Excel

Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα του Excel, δωρεάν δοκιμή χωρίς περιορισμό σε 30 ημέρες. Λήψη και δωρεάν δοκιμή τώρα!

Σχετικά άρθρα:

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

kte καρτέλα 201905


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (61)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
how to get a extract extact numbers from text
This comment was minimized by the moderator on the site
Hi, I'm looking to list all numbers in a string before a certain character. The string has letters and numbers, so I want to remove the letters and only list the numbers that appear before the second minus sign "-". Example:MUMUT-S941-22460991e002
I want that to isolate the numbers 941 in the above example.
This comment was minimized by the moderator on the site
How to use Index instead of Indirect to extract number from string. Indirect is volatile and Index can replace it as per http://www.excelhero.com/blog/2011/03/the-imposing-index.html. Thanks Ahead!
This comment was minimized by the moderator on the site
Hello! I found the following formula to extract only the numbers from text strings in Excel very useful

SUMPRODUCT(MID(0&A5, LARGE(INDEX(ISNUMBER(--MID(A5, ROW(INDIRECT("1:"&LEN(A5))), 1)) * ROW(INDIRECT("1:"&LEN(A5))), 0), ROW(INDIRECT("1:"&LEN(A5))))+1, 1) * 10^ROW(INDIRECT("1:"&LEN(A5)))/10)

Could you explain more on this formula as it seems quite complicated? Many thanks.
This comment was minimized by the moderator on the site
Reading ID: 3151346 BeatO User ID: 239930 Name: Mahesh Phone: 9823010759 Email: City: nashik State: Maharashtra Reading: 55 Meal Time: Random Meal Type: RANDOM Reading Time: 2020-03-01 00:15:57 View user readings in Portal



I want to extract numeric no. post Reading text
This comment was minimized by the moderator on the site
Hello, how can i extract the cheque no.only from the below text

OUTWARD CLEARING CLRG CHQ DEPOSIT CHQ. NO: 000123~700320456 ABCD ARAB PLAZ BRANC Value DATE, 01/02/2020 - S79519642

i tried below formula and its working but i need to change the 1:57 by calculating how many character before the first digit plus how many digits i want to extract.
=MIN(FIND({0,1,2,3,4,5,6,7,8,9},A3&"0123456789"))+5 im using this formula to know how many characters before the first number..

=TEXTJOIN("",TRUE,IFERROR(MID(A3,ROW(INDIRECT("1:57")),1)+0,""))
This comment was minimized by the moderator on the site
=Mid(A2,find("CHQ. NO", A2)+9,6)
This comment was minimized by the moderator on the site
Hi. I wonder to know is it possible to extract from the next string '102-105+106-10605-10605 -10631-10632-10633-10634-10635+107' all values of only three digits that have sign '-' (i.e. minus) before them (or plus - doesn't matter). Then extract extract all 5-digits values with the same rule? If this is possible to do I will save many many hours of manual work that I can devote to lot's of uselful tasks.

P.S.
I know that regular expressions are able to do that, BUT... I hate their syntax, so I'm searching any other method to complete this task.

Thanks in advance.
This comment was minimized by the moderator on the site
Hi, is it possible to extract the numbers before "g", for example : 25,20,15,25,300,40

Ali Baba Dark Chocolate 25g box 12 pcs
Ali Baba Dark Chocolate 20g*24 box
Cadbury 5 Star White Chocolate 15g
Kinder 2 White Chocolate 25g*24
ALpella Biscuits W/Marshmallow300g
Alpella Chocolate 40g
This comment was minimized by the moderator on the site
did anyone answer or did you figure this out? this is exactly my problem right - even down to the letter 'g'. the problem with the formula I am using now is that it returns the first number, if there are more than one, from the string and not the number I am wishing to return.
This comment was minimized by the moderator on the site
Hi, is it possible to extract the numbers before "g", for example : 25,20,15,25,300,40


Ali Baba Dark Chocolate 25g box 12 pcs
Ali Baba Dark Chocolate 20g*24 box
Cadbury 5 Star White Chocolate 15g
Kinder 2 White Chocolate 25g*24
ALpella Biscuits W/Marshmallow300g
Alpella Chocolate 40g
This comment was minimized by the moderator on the site
can any one answer this question, how to extract the no's
This comment was minimized by the moderator on the site
You may try select the number before g in the first cell, copy and paste it in new cell. Then press CTRL + E. All the number before g will be auto generated. 

This comment was minimized by the moderator on the site
Tkssssss you saved my day :) God bless you
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations