Note: The other languages of the website are Google-translated. Back to English

Πώς να αφαιρέσετε μόνο κείμενο από κελιά που περιέχουν αριθμούς και κείμενα στο Excel;

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

Καταργήστε μόνο κείμενο από κελιά που περιέχουν αριθμούς και κείμενα με λειτουργία που καθορίζεται από το χρήστη
Καταργήστε εύκολα μόνο κείμενο από κελιά που περιέχουν αριθμούς και κείμενα με το Kutools για Excel


Καταργήστε μόνο κείμενο από κελιά που περιέχουν αριθμούς και κείμενα με λειτουργία που καθορίζεται από το χρήστη

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

1. Πάτα το άλλος + F11 ταυτόχρονα για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο Κώδικας παράθυρο. Δείτε το στιγμιότυπο οθόνης:

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

Function OnlyNums(strWord As String)
    Dim strChar As String
    Dim x As Integer
    Dim strTemp As String

    strTemp = ""
    Application.ScreenUpdating = False
    For x = 1 To Len(strWord)
        strChar = Mid(strWord, x, 1)
        If Asc(strChar) >= 48 And _
          Asc(strChar) <= 57 Then
            strTemp = strTemp & strChar
        End If
    Next
    Application.ScreenUpdating = True
    OnlyNums = Val(strTemp)
End Function

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("A1:B10")) Is Nothing Then Cancel = True
End Sub

3. Πάτα το άλλος + Q πλήκτρα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

4. Επιλέξτε ένα κενό κελί, εισαγάγετε τον τύπο = Μόνο Αριθμοί (A2) στη γραμμή τύπων και, στη συνέχεια, πατήστε το εισάγετε κλειδί για να λάβετε το αποτέλεσμα. Συνεχίστε να επιλέγετε το κελί αποτελεσμάτων, σύρετε τη λαβή πλήρωσης προς τα κάτω για να λάβετε όλα τα αποτελέσματα. Δείτε το στιγμιότυπο οθόνης:

Note: Στον τύπο. Το A2 είναι το κελί που θα αφαιρέσετε κείμενα και θα κρατήσετε μόνο αριθμούς. Αλλάξτε το όπως χρειάζεστε.

Τώρα μπορείτε να δείτε ότι όλα τα κείμενα αφαιρούνται και μόνο οι αριθμοί διατηρούνται σε καθορισμένα κελιά.


Καταργήστε εύκολα μόνο κείμενο από κελιά που περιέχουν αριθμούς και κείμενα με το Kutools για Excel

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

Πριν από την εφαρμογή Kutools για Excel, σας παρακαλούμε κατεβάστε και εγκαταστήστε το πρώτα.

1. Επιλέξτε τα κελιά που χρειάζεστε για να αφαιρέσετε κείμενα και να διατηρήσετε μόνο αριθμούς και, στη συνέχεια, κάντε κλικ στο Kutools > Κείμενο > Κατάργηση χαρακτήρων

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

Στη συνέχεια, όλοι οι μη αριθμητικοί χαρακτήρες (κείμενα) αφαιρούνται από επιλεγμένα κελιά αμέσως όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης.

  Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημέρα) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.


Σχετικό άρθρο:


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

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

  • Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
  • Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
  • Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
  • Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
  • Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
  • Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
  • Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
kte καρτέλα 201905

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

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (5)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Έχω χρησιμοποιήσει το excel για χρόνια, αλλά κανένας power worker δεν χρησιμοποίησε ποτέ τη Visual Basic σε υπολογιστικό φύλλο πριν. Αυτή η μέθοδος λειτούργησε για πρώτη φορά, απλώς ακολουθώντας τις σαφείς οδηγίες παραπάνω και εξοικονόμησε ώρες καθαρισμού ενός εισαγόμενου φύλλου. Ευχαριστώ πολύ - εκτιμώ πολύ. Στην υγειά σας
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας, μαζί
Ich finde die VBA super und genau das was ich für meinen Job benötige. Jedoch eine Frage an euch Spezialisten, wenn ich führende Nullen habe dann funktioniert die VBA bei mir nicht, gibt's da einen Trick damit dies auch geht; Grüße
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου Rolands,
Συγγνώμη δεν καταλαβαίνω καλά τι εννοείς. Θέλετε να διατηρήσετε τα μηδενικά στην αρχή αφού αφαιρέσετε μόνο τα κείμενα από τα κελιά;
Ή μπορείτε να ανεβάσετε ένα στιγμιότυπο οθόνης των δεδομένων σας εδώ για να περιγράψετε το πρόβλημα πιο ξεκάθαρα.
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σας,

Si on veut conserver les virgules avec les chiffres, σχόλιο peut-on faire; Merci pour votre réponse
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου Enzo,

Λυπάμαι που δεν καταλαβαίνω καλά την ερώτησή σου. Για λόγους σαφήνειας, επισυνάψτε ένα δείγμα αρχείου ή ένα στιγμιότυπο οθόνης με τα δεδομένα σας και τα επιθυμητά αποτελέσματα.
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL