Πώς να επιλέξετε τυχαία κελιά στο Excel;
Ας υποθέσουμε ότι έχετε μια στήλη τιμών (A1: A15) σε ένα φύλλο εργασίας και τώρα πρέπει να επιλέξετε 5 τυχαία κελιά από αυτά, πώς θα μπορούσατε να το αντιμετωπίσετε; Σε αυτό το άρθρο, θα σας δείξω μερικά κόλπα για να επιλέξετε κελιά τυχαία στο Excel.
Επιλέξτε κελιά τυχαία από μια στήλη με τύπο
Επιλέξτε κελιά τυχαία από μια στήλη με λειτουργία που καθορίζεται από το χρήστη (UDF)
Επιλέξτε κελιά τυχαία από ένα εύρος με το Kutools για Excel 
Επιλέξτε κελιά τυχαία από μια στήλη με τύπο
Όπως δείχνει το παρακάτω στιγμιότυπο οθόνης, έχετε μια σειρά δεδομένων από A1 έως A15, το Rand και Περιεχόμενα Ο τύπος μπορεί να σας βοηθήσει να εμφανίσετε τα τυχαία κελιά σε μια νέα στήλη. Κάντε τα εξής:
1. Στο παρακείμενο κελί όπως το B1, εισαγάγετε τον τύπο = RAND (), και πατήστε το εισάγετε και, στη συνέχεια, αντιγράψτε τον τύπο στο κελί B15. Και οι τυχαίες τιμές θα γεμίσουν με τα κελιά. Δείτε το στιγμιότυπο οθόνης:
2. Στη συνέχεια, στο επόμενο κελί πάνω, σε αυτήν την περίπτωση το κελί C1, εισαγάγετε τον τύπο =INDEX($A$1:$A$15,RANK(B1,$B$1:$B$15)).
3. Στη συνέχεια, πατήστε εισάγετε και επιλέξτε το κελί C1, σύρετε τη λαβή πλήρωσης για να καλύψετε όσα κελιά επιθυμείτε. Στη στήλη Γ έχουν εμφανιστεί τυχαία 5 κελιά της περιοχής Α1: Α15. Δείτε το στιγμιότυπο οθόνης:
Γρήγορη ταξινόμηση ή επιλογή κελιών / γραμμών / στηλών τυχαία από μια επιλογή στο Excel
|
| Kutools for Excel's Sort Range Τυχαία μπορεί γρήγορα να ταξινομήσει ή να επιλέξει δεδομένα τυχαία ανά κελιά ή στήλες ή σειρές. Κάντε κλικ για πλήρεις δυνατότητες 30 ημέρες δωρεάν δοκιμή! |
 |
 |
| Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό στο 30 ημέρα. |
Επιλέξτε κελιά τυχαία από μια στήλη με λειτουργία που καθορίζεται από το χρήστη (UDF)
Ο παρακάτω κώδικας VBA μπορεί επίσης να σας βοηθήσει να εμφανίσετε τυχαία κελιά που χρειάζεστε.
1. κλικ Εργολάβος > Visual Basic, Ένα νέο Microsoft Visual Basic για εφαρμογές θα εμφανιστεί το παράθυρο, κάντε κλικ Κύριο θέμα > Μονάδα μέτρησηςκαι εισαγάγετε την ακόλουθη συνάρτηση στο Μονάδα μέτρησης:
Function RandomSelection(aRng As Range)
'Update20131113
Dim index As Integer
Randomize
index = Int(aRng.Count * Rnd + 1)
RandomSelection = aRng.Cells(index).Value
End Function
2. Στη συνέχεια, κλείστε το παράθυρο της μονάδας και εισαγάγετε αυτήν τη λειτουργία = RandomSelection ($ A $ 1: $ A $ 15) στο κελί B1. Δείτε το στιγμιότυπο οθόνης:
3. Τύπος εισάγετε κλειδί και μια τυχαία τιμή A1: A15 έχει εμφανιστεί στη στήλη Β. Στη συνέχεια, σύρετε τη λαβή πλήρωσης για να καλύψετε όσα κελιά θέλετε τις επιλογές.
Οι παραπάνω δύο μέθοδοι μπορούν να εμφανίσουν τις τυχαίες τιμές κελιού σε μια νέα στήλη και εφαρμόζονται μόνο για ένα εύρος στήλης και όχι για μια περιοχή κελιών. Το εργαλείο Kutools for Excel's Sort Range Randomly μπορεί να σας βοηθήσει να επιλέξετε κελιά τυχαία σε μια αρχική περιοχή εύκολα.
Επιλέξτε κελιά τυχαία από ένα εύρος με το Kutools για Excel
| Kutools για Excel, με περισσότερα από 300 εύχρηστες λειτουργίες, διευκολύνει τις εργασίες σας. | ||
Μετά το δωρεάν εγκατάσταση Kutools για Excel, κάντε τα παρακάτω:
1. Επιλέξτε το εύρος που θέλετε να χρησιμοποιήσετε.
2. Εφαρμόστε το βοηθητικό πρόγραμμα κάνοντας κλικ Kutools > Σειρά > Ταξινόμηση / Επιλογή Εύρους Τυχαία, δείτε το στιγμιότυπο οθόνης:
3. Στο Ταξινόμηση / Επιλογή Εύρους Τυχαία , κάντε κλικ στην επιλογή Αγορά και εισαγάγετε τον αριθμό των κελιών που θέλετε να επιλέξετε και, στη συνέχεια, επιλέξτε το Επιλέξτε Τύπος χρειάζεσαι. Στη συνέχεια κάντε κλικ OK or Ισχύουν. Δείτε screenshot:
Επιλέξτε τυχαία 10 κελιά από την επιλεγμένη περιοχή
Επιλέξτε τυχαίες 5 σειρές από το επιλεγμένο εύρος
Επιλέξτε τυχαίες 4 στήλες από το επιλεγμένο εύρος
Προηγμένη για την επιλογή τυχαίων κελιών, Ταξινόμηση εύρους τυχαία of Kutools για Excel μπορεί να ταξινομήσει δεδομένα τυχαία σε ολόκληρο το εύρος, σε κάθε σειρά, σε κάθε στήλη και ούτω καθεξής.
επιλέξτε τυχαία ή ταξινομήστε δεδομένα σε μια περιοχή
Εισαγάγετε εύκολα τυχαία δεδομένα χωρίς διπλότυπα σε μια σειρά κελιών |
| Αν θέλετε να εισαγάγετε τυχαίους και χωρίς διπλούς ακέραιους αριθμούς, ημερομηνίες, ώρες ή συμβολοσειρές, ακόμη και προσαρμοσμένες λίστες σε μια σειρά κελιών, το φόρουμ ίσως είναι δύσκολο να θυμηθείτε. Αλλά Kutools για τυχαία δεδομένα Inser του Excel μπορεί να χειριστεί γρήγορα αυτές τις εργασίες όσο το δυνατόν πιο εύκολα. Κάντε κλικ για πλήρη χαρακτηριστικά 30 ημέρες δωρεάν δοκιμή! |
 |
| Kutools για Excel: με περισσότερα από 300 εύχρηστα πρόσθετα Excel, δωρεάν δοκιμή χωρίς περιορισμό στο 30 ημέρα. |
Σχετικές άρθρο:
Τυχαία ταξινόμηση κελιών σε μια στήλη ή εύρος
Τα καλύτερα εργαλεία παραγωγικότητας του Office
Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%
- Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
- Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
- Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
- Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
- Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
- Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
- Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
- Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
- Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
