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

Πώς να δημιουργήσετε τυχαίες συμβολοσειρές χαρακτήρων σε μια περιοχή στο Excel;

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

Δημιουργήστε τυχαίες συμβολοσειρές χαρακτήρων με τύπους
Δημιουργήστε τυχαίες συμβολοσειρές χαρακτήρων με κώδικα VBA
Δημιουργήστε εύκολα συμβολοσειρές τυχαίων χαρακτήρων με το Kutools για Excel


Δημιουργήστε τυχαίες συμβολοσειρές χαρακτήρων με τύπους

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

1. Για να δημιουργήσετε έναν τυχαίο 5ψήφιο αριθμό μεταξύ 10000 και 99999, χρησιμοποιήστε αυτόν τον τύπο: = RANDBETWEEN (10000,99999), και πατήστε εισάγετε κλειδί, ένας 5ψήφιος αριθμός θα εμφανίζεται σε ένα κελί και, στη συνέχεια, επιλέξτε το κελί και σύρετε τη λαβή πλήρωσης στο εύρος που θέλετε να περιέχει αυτόν τον τύπο, δημιουργήθηκε μια σειρά από 5-ψήφους αριθμούς, δείτε στιγμιότυπα οθόνης:

doc-create-string1 -2 doc-create-string2

Note: μπορείτε να αλλάξετε τα επιχειρήματα για να λάβετε τις ανάγκες σας.

2. Για να δημιουργήσετε ένα τυχαίο γράμμα, χρησιμοποιήστε αυτόν τον τύπο: = CHAR (RANDBETWEEN (65,90)). Αυτός ο τύπος μπορεί να δημιουργήσει ένα τυχαίο γράμμα από το α έως το ζ, εάν πρέπει να δημιουργήσετε τέσσερα τυχαία γράμματα, πρέπει να χρησιμοποιήσετε το & χαρακτήρας για να προσθέσετε τα γράμματα. Οπως = CHAR (RANDBETWEEN (65,90)) & CHAR (RANDBETWEEN (65,90)) & CHAR (RANDBETWEEN (65,90)) & CHAR (RANDBETWEEN (65,90)). Στη συνέχεια, θα λάβετε τέσσερα τυχαία γράμματα και, στη συνέχεια, σύρετε τη λαβή πλήρωσης στην περιοχή που θέλετε να περιέχει αυτόν τον τύπο. Δείτε το στιγμιότυπο οθόνης:

doc-create-string3

Notes:

(1.) Ο τύπος ισχύει στο Excel 2007, 2010 και 2013, αλλά όχι στο Excel 2003. Στο Excel 2003, χρησιμοποιήστε τον τύπο = CHAR (INT (RAND () * 25 + 65)) & CHAR (INT (RAND () * 25 + 65)) & CHAR (INT (RAND () * 25 + 65)) & CHAR (INT (RAND () * 25 + 65))

(2.) Στον τύπο 65 είναι Α και 90 είναι Ζ.

(3.) Μπορείτε να χρησιμοποιήσετε τον χαρακτήρα & για να προσθέσετε τον αριθμό των γραμμάτων που χρειάζεστε.

3. Για να δημιουργήσετε μια τυχαία αλφαριθμητική συμβολοσειρά που έχει δύο γράμματα και δύο αριθμούς, χρησιμοποιήστε αυτόν τον τύπο: = CHAR (RANDBETWEEN (65,90)) & CHAR (RANDBETWEEN (65,90)) & RANDBETWEEN (10,99) Και θα λάβετε τις ακόλουθες συμβολοσειρές σε μια περιοχή που περιέχει δύο γράμματα και δύο αριθμούς:

doc-create-string4

Note: μπορείτε να αλλάξετε τα ορίσματα για να λάβετε τον αριθμό ψηφίου όπως χρειάζεστε και να χρησιμοποιήσετε & για να προσθέσετε τον αριθμό των γραμμάτων.

Δημιουργήστε εύκολα τυχαίες συμβολοσειρές χαρακτήρων σε επιλεγμένο εύρος:

Είναι εύκολο να δημιουργήσετε τυχαίες συμβολοσειρές χαρακτήρων με συγκεκριμένους χαρακτήρες και μήκος κειμένου με το Εισαγωγή τυχαίων δεδομένων χρησιμότητα του Kutools για Excel.
Κατεβάστε το Kutools για Excel τώρα! (Δωρεάν διαδρομή 30 ημερών)


Δημιουργήστε τυχαίες συμβολοσειρές χαρακτήρων με κώδικα VBA

Εάν πιστεύετε ότι οι παραπάνω τύποι είναι δύσκολοι και ενοχλητικοί, ο παρακάτω κώδικας VBA μπορεί να σας βοηθήσει πολύ πιο εύκολα. Κάντε το ως εξής:

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

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

Public Function RandomizeF(Num1 As Integer, Num2 As Integer)
'Update 20131107
Dim Rand As String
Application.Volatile
getLen = Int((Num2 + 1 - Num1) * Rnd + Num1)
Do
    i = i + 1
    Randomize
    Rand = Rand & Chr(Int((85) * Rnd + 38))
Loop Until i = getLen
RandomizeF = Rand
End Function

3. Στη συνέχεια, αποθηκεύστε και κλείστε τον κωδικό, σε ένα κελί, εισαγάγετε αυτήν τη λειτουργία = RandomizeF (x, y) για να εισαγάγετε μια τυχαία συμβολοσειρά χαρακτήρων με ελάχιστο μήκος χαρακτήρων x και μέγιστο μήκος χαρακτήρων y.

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

doc-create-string5


Δημιουργήστε τυχαίες συμβολοσειρές χαρακτήρων με το Kutools για Excel

Υπάρχει τρόπος δημιουργίας τυχαίων συμβολοσειρών με γράμματα, αριθμούς και ειδικούς χαρακτήρες ή περισσότερα; Kutools για Excel's Εισαγωγή τυχαίων δεδομένων είναι μια εξαιρετική γεννήτρια τυχαίων αριθμών (και συμβολοσειρών κειμένου), η οποία μπορεί να δημιουργήσει τυχαίους αριθμούς, τυχαία συμβολοσειρά κειμένου ή τυχαίους αριθμούς & κείμενο και σύμβολα με όλα τα είδη χαρακτήρων, συμπεριλαμβανομένων γραμμάτων, αριθμών, ειδικών χαρακτήρων, διαστήματος και ακόμη και προσαρμοσμένων συμβολοσειρών.

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

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

3. Στην Εισαγωγή τυχαίων δεδομένων , κάντε κλικ στην επιλογή Σπάγγος και επιλέξτε τον τύπο των χαρακτήρων που χρειάζεστε και, στη συνέχεια, καθορίστε το μήκος της συμβολοσειράς στο Μήκος στοιχειοσειράς πλαίσιο και, τέλος, κάντε κλικ στο OK κουμπί. Δείτε το στιγμιότυπο οθόνης:

Στη συνέχεια, το επιλεγμένο εύρος έχει γεμίσει με τυχαίες συμβολοσειρές χαρακτήρων.

Άκρο: εάν θέλετε να δημιουργήσετε ή να εισαγάγετε μια καθορισμένη συμβολοσειρά δεδομένων μορφοποίησης (όπως ???? @. ??. com) σε μια περιοχή, μπορείτε επίσης να χρησιμοποιήσετε αυτό το βοηθητικό πρόγραμμα. Κάντε το ως εξής:

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

Note: Χρησιμοποιώντας ? για να υποδείξει ένα ψηφίο τυχαίου χαρακτήρα στις τελικές καθορισμένες συμβολοσειρές μορφοποίησης.

2. Στη συνέχεια κάντε κλικ στο κουμπί OK or Εφαρμογή. Οι καθορισμένες συμβολοσειρές δεδομένων μορφοποίησης έχουν δημιουργηθεί τυχαία ως εξής. Δείτε το στιγμιότυπο οθόνης:

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

  • Δημιουργήστε ή εισαγάγετε τυχαίους αριθμούς σε μια περιοχή
  • Δημιουργήστε ή εισαγάγετε τυχαία ημερομηνία σε ένα εύρος
  • Δημιουργήστε ή εισαγάγετε μια προσαρμοσμένη λίστα σε ένα εύρος

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


Επίδειξη: Δημιουργήστε τυχαίες συμβολοσειρές χαρακτήρων σε μια περιοχή


Σχετικές άρθρο:

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

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

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

Περιγραφή


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

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!

Comments (29)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I found this useful as a starting point--I hadn't touched VBA in several years, so it was way easier to use the sample code here as a basis than start from scratch. Skelly1008, have you thought about something like this? Do Randomize charVal = (Int(85 * Rnd) + 48) If charVal > &H30 And charVal < &H7A Then If Not (charVal > &H5A And charVal < &H61) Then If Not (charVal > &H39 And charVal < &H41) Then newChar = Chr(charVal) Rand = Rand & newChar End If i = i + 1 End If End If Loop Until i = getLen That generates strings that contain only a-z, A-Z, and 0-9.
This comment was minimized by the moderator on the site
I'm looking for a code that can generate any number 0 to 9 and or any letter A to Z. But I need 25 characters in the that final out put.
This comment was minimized by the moderator on the site
Found way: 1st: For each char: =RANDBETWEEN(0;1) to randomly select a number or a letter (result in A2 to A9, for example) 2nd: =IF(An=0;RANDBETWEEN(0;9);CHAR(RAND()*26+97)) - in B2 to B9 -> to generate a number or a letter depending on result in A column 3rd: in the cell you want the generated password: =B2&B3&B4&B5&B6&B7&B8&B9
This comment was minimized by the moderator on the site
I live the formula but once I enter something in another field the numbers in the random fields change. I only want it to randomly generate one time. Not every time I enter data in other fields on the worksheet. Is that a separate function? Thanks!
This comment was minimized by the moderator on the site
Hi I want one help from you. I have to replace one last three values in this text for example: LoadTesting . I want to change only last three word of it
This comment was minimized by the moderator on the site
[quote]Hi I want one help from you. I have to replace one last three values in this text for example: LoadTesting . I want to change only last three word of itBy rOHIT[/quote] Assuming it is in cell A1:

=MID(A1,1,LEN(A1)-3)&"CAT"
This comment was minimized by the moderator on the site
Hi, On generating the random number in excel,can we insert the value to a form?any query plz share
This comment was minimized by the moderator on the site
This is several times better than I dared hope for!! I completely disregarded the idea of generating several values in a single cell. Guaranteed I'll be using this info every chance I get! 11/10.
This comment was minimized by the moderator on the site
Hi i would like to make the same in a MS WORD tab. is it possible ?
This comment was minimized by the moderator on the site
The VBA isn't working as a true random number. I'm using (10,12) as the criteria and if I run it down a couple thousand rows and do a countif formula in the adjacent column I find many duplicate passwords.
This comment was minimized by the moderator on the site
Very helpful, thank you. Using the VBA code, is it possible to only show letters and numbers and not other symbols?
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