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

Πώς να προσθέσετε κενό μεταξύ χαρακτήρων ή κάθε ψηφίου στο Excel;

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

Προσθέστε κενό μεταξύ χαρακτήρων ή κάθε ψηφίου με λειτουργία που καθορίζεται από το χρήστη
Προσθέστε κενό μεταξύ χαρακτήρων ή κάθε ψηφίου με το Kutools για Excel


Προσθέστε κενό μεταξύ χαρακτήρων ή κάθε ψηφίου με λειτουργία που καθορίζεται από το χρήστη

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

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

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

Κωδικός VBA: Προσθέστε κενό μεταξύ χαρακτήρων ή κάθε ψηφίου
Function AddSpace(Str As String) As String
    Dim i As Long
    For i = 1 To Len(Str)
        AddSpace = AddSpace & Mid(Str, i, 1) & " "
    Next i
    AddSpace = Trim(AddSpace)
End Function

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

4. Επιλέξτε ένα κενό κελί, εισαγάγετε τον τύπο = AddSpace (B2) στη γραμμή τύπων και, στη συνέχεια, πατήστε το εισάγετε κλειδί.

Σε αυτήν την περίπτωση, μπορείτε να δείτε τα κενά να προστίθενται μεταξύ των χαρακτήρων του κελιού B2.

doc προσθέστε κενό μεταξύ χαρακτήρων 1

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


Προσθέστε κενό μεταξύ χαρακτήρων ή κάθε ψηφίου με το Kutools για Excel

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

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

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

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

Για την προσθήκη διαστήματος μεταξύ χαρακτήρων:

Επιλέξτε Το 1ο γράμμα είναι κεφαλαίο / πεζά επιλογή στην αναπτυσσόμενη λίστα και, τέλος, κάντε κλικ στο OK κουμπί.

Για την προσθήκη διαστήματος μεταξύ κάθε ψηφίου:

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

doc προσθέστε κενό μεταξύ χαρακτήρων 1

Στη συνέχεια, τα κενά προστίθενται μεταξύ χαρακτήρων ή κάθε ψηφίου των καθορισμένων κελιών.

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


Προσθέστε κενό μεταξύ χαρακτήρων ή κάθε ψηφίου με το Kutools για Excel


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


Τα καλύτερα εργαλεία παραγωγικότητας του 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% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (1)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Το AddSpace είναι ένα φοβερό hack. Ευχαριστώ. Ήθελα να μετατρέψω το κείμενο σε στήλες έτσι ώστε κάθε χαρακτήρας να βρίσκεται σε διαφορετική στήλη. Η εισαγωγή κειμένου στη στήλη δεν ήταν δυνατή επειδή πρέπει να διαχωριστούν οι χαρακτήρες. Έτσι, χρησιμοποίησα τη συνάρτηση addspace από αυτήν τη σελίδα και στη συνέχεια μετέτρεψα το κείμενο σε στήλες και λειτούργησε. :)
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Αφήστε τα σχόλιά σας
Δημοσίευση ως επισκέπτης
×
Αξιολογήστε αυτήν την ανάρτηση:
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

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

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