Πώς να διαιρέσετε τιμές διαχωρισμένες με κόμμα σε σειρές ή στήλες στο Excel;
Σε ορισμένες περιπτώσεις, ίσως χρειαστεί να διαχωρίσετε τιμές διαχωρισμένες με κόμμα επιλεγμένων κελιών σε σειρές ή στήλες. Εδώ θα παρουσιάσουμε τρεις μεθόδους για να λύσετε αυτό το πρόβλημα λεπτομερώς.
Διαχωρίστε τιμές διαχωρισμένες με κόμμα σε στήλες με λειτουργία κειμένου σε στήλες
Διαχωρίστε τιμές διαχωρισμένες με κόμμα σε σειρές με κώδικα VBA
Διαχωρίστε γρήγορα τιμές διαχωρισμένες με κόμμα σε σειρές ή στήλες με το Kutools για Excel
Διαχωρίστε τιμές διαχωρισμένες με κόμμα σε στήλες με λειτουργία κειμένου σε στήλες
Μπορείτε να εφαρμόσετε τη συνάρτηση Text to Columns για να διαχωρίσετε τιμές διαχωρισμένες με κόμμα επιλεγμένων κελιών σε στήλες. Κάντε τα εξής.
1. Επιλέξτε το εύρος των κελιών που θέλετε να χωρίσετε τιμές σε στήλες και, στη συνέχεια, κάντε κλικ στο ημερομηνία > Κείμενο σε στήλες. Δείτε το στιγμιότυπο οθόνης:
2. Στην πρώτη Μετατροπή του οδηγού "Κείμενο σε στήλες" πλαίσιο διαλόγου, επιλέξτε το Οριοθετημένη και στη συνέχεια κάντε κλικ στο Επόμενο κουμπί.
3. Στο δεύτερο Μετατροπή του οδηγού "Κείμενο σε στήλες" πλαίσιο διαλόγου, επιλέξτε μόνο το Κόμμα στο πλαίσιο Διαχωριστές και κάντε κλικ στο Επόμενο κουμπί.
4. Στο τελευταίο Μετατροπή του οδηγού "Κείμενο σε στήλες" πλαίσιο διαλόγου, επιλέξτε ένα κελί για τον εντοπισμό των τιμών διαχωρισμού στο Προορισμός πλαίσιο και, τέλος, κάντε κλικ στο φινίρισμα κουμπί. Δείτε το στιγμιότυπο οθόνης:
Τώρα όλες οι τιμές σε επιλεγμένα κελιά που χωρίστηκαν με κόμματα χωρίζονται σε διαφορετικές στήλες όπως φαίνεται παρακάτω.
Κανονικά, το Κείμενο σε στήλες Η λειτουργία χωρίζει μόνο κελιά σε ξεχωριστές στήλες, εάν θέλετε να χωρίσετε κελιά σε σειρές, πώς μπορείτε να το κάνετε;
εδώ η Kutools για Excel's Διαίρεση κελιών Το βοηθητικό πρόγραμμα μπορεί να σας βοηθήσει να χωρίσετε γρήγορα κελιά ανά χώρο, κόμμα, νέα γραμμή, άλλα διαχωριστικά ή συγκεκριμένο πλάτος σε όχι μόνο διαχωρισμένες σειρές, αλλά και στήλες στο Excel. Κατεβάστε το Kutools για Excel τώρα! (Δωρεάν διαδρομή 30 ημερών)
Διαχωρίστε τιμές διαχωρισμένες με κόμμα σε σειρές με κώδικα VBA
Για να χωρίσετε τιμές διαχωρισμένες με κόμμα σε σειρές, μπορείτε να εφαρμόσετε τον ακόλουθο κώδικα VBA.
1. Πάτα το άλλος + F11 ταυτόχρονα για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
2. Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησης. Στη συνέχεια, αντιγράψτε και επικολλήστε τον παρακάτω κώδικα VBA στο παράθυρο Module.
Κωδικός VBA: Διαχωρίστε τιμές διαχωρισμένες με κόμμα σε σειρές
Sub SplitAll()
Dim xRg As Range
Dim xRg1 As Range
Dim xCell As Range
Dim I As Long
Dim xAddress As String
Dim xUpdate As Boolean
Dim xRet As Variant
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Columns.Count > 1 Then
MsgBox "You can't select multiple columns", , "Kutools for Excel"
Exit Sub
End If
Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
Set xRg1 = xRg1.Range("A1")
If xRg1 Is Nothing Then Exit Sub
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
xRet = Split(xCell.Value, ",")
xRg1.Worksheet.Range(xRg1.Offset(I, 0), xRg1.Offset(I + UBound(xRet, 1), 0)) = Application.WorksheetFunction.Transpose(xRet)
I = I + UBound(xRet, 1) + 1
Next
Application.ScreenUpdating = xUpdate
End Sub3. Πάτα το F5 κλειδί για την εκτέλεση του κώδικα. Στο αναδυόμενο Kutools για Excel πλαίσιο διαλόγου, επιλέξτε τα κελιά που θέλετε να διαχωρίσετε και, στη συνέχεια, κάντε κλικ στο OK κουμπί.
4. Στο δεύτερο αναδυόμενο παράθυρο Kutools για Excel πλαίσιο διαλόγου, επιλέξτε ένα κελί για τον εντοπισμό των τιμών διαχωρισμού και, στη συνέχεια, κάντε κλικ στο OK.
Στη συνέχεια, μπορείτε να δείτε τις τιμές διαχωρισμένες με κόμμα σε επιλεγμένα κελιά χωρίζονται σε σειρές όπως φαίνεται παρακάτω.
Διαχωρίστε γρήγορα τιμές διαχωρισμένες με κόμμα σε σειρές ή στήλες με το Kutools για Excel
The Διαίρεση κελιών χρησιμότητα του Kutools για Excel μπορεί να σας βοηθήσει να διαχωρίσετε τιμές διαχωρισμένες με κόμμα σε σειρές ή στήλες εύκολα.
1. Επιλέξτε τα κελιά που πρέπει να διαχωρίσετε και, στη συνέχεια, κάντε κλικ στο Kutools > Συγχώνευση & διαχωρισμός > Διαίρεση κελιών. Δείτε το στιγμιότυπο οθόνης:
2. Στο Διαίρεση κελιών , επιλέξτε Διαχωρισμός σε σειρές or Διαχωρισμός σε στήλες στο Χαρακτηριστικά ενότητα όπως χρειάζεστε. Και στο Καθορίστε ένα διαχωριστικό , επιλέξτε το ΑΛΛΑ επιλογή, εισαγάγετε το σύμβολο κόμμα στο πλαίσιο κειμένου και, στη συνέχεια, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:
3. Και στη συνέχεια θα εμφανιστεί ένα άλλο πλαίσιο προτροπής για να σας υπενθυμίσει ότι επιλέγετε ένα κελί για έξοδο του αποτελέσματος, δείτε το στιγμιότυπο οθόνης:
4. κλικ OK κουμπί, μπορείτε να δείτε τα αποτελέσματα όπως φαίνεται παρακάτω τα στιγμιότυπα οθόνης.
Διαχωρισμός σε στήλες
Διαχωρισμός σε σειρές
Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.
Επίδειξη: Διαχωρίστε γρήγορα τιμές διαχωρισμένες με κόμμα σε σειρές ή στήλες με το Kutools για Excel
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
