Μέθοδος 1:Χρήση τύπων (καλύτερος για μικρότερους αριθμούς)
Αυτή η μέθοδος είναι πρακτική για την εξεύρεση παραγόντων σχετικά μικρού αριθμού. Λειτουργεί ελέγχοντας κάθε αριθμό από 1 μέχρι την τετραγωνική ρίζα του αριθμού στόχου. Εάν ένας αριθμός είναι ένας παράγοντας, τόσο ο IT όσο και ο αντίστοιχος παράγοντας του (ο αριθμός στόχου διαιρούνται από αυτόν) προστίθενται στη λίστα.
1. Ρυθμίστε το υπολογιστικό φύλλο σας:
* Στο κελί Α1, εισαγάγετε τον αριθμό που θέλετε να βρείτε τους παράγοντες (π.χ. 12).
* Στο κύτταρο Β1, εισαγάγετε τον τύπο `=sqrt (a1)` για να υπολογίσετε την τετραγωνική ρίζα.
* Στο κελί C1, εισάγετε την κεφαλίδα "παράγοντες".
* Στο κελί C2, εισαγάγετε τον τύπο `=αν (mod (a $ 1, ROW ()-1) =0, ROW ()-1," ")`. Αυτό ελέγχει εάν το `row ()-1` (ξεκινώντας από το 1) είναι ένας παράγοντας του αριθμού στο A1. Εάν είναι, εμφανίζει τον αριθμό. Διαφορετικά, εμφανίζει μια κενή συμβολοσειρά.
* Σύρετε τον τύπο στο C2 σε έναν αριθμό σειράς περίπου ίσο με την τιμή στο B1 (η τετραγωνική ρίζα).
2. Συμπληρώστε τη λίστα συντελεστών:
* Σε μια ξεχωριστή στήλη (π.χ. D1), εισαγάγετε την κεφαλίδα "Παράγοντες (συνέχεια)".
* Στο κελί D2, εισαγάγετε τον τύπο `=αν (c2 <>" ", a $ 1/c2," ")`. Αυτό υπολογίζει τον αντίστοιχο παράγοντα για κάθε παράγοντα που βρίσκεται στη στήλη C.
* Σύρετε αυτόν τον τύπο προς τα κάτω για να ταιριάζει με το μήκος της στήλης C.
3. Συνδυάστε και αφαιρέστε αντίγραφα (προαιρετικά):
* Στη συνέχεια, μπορείτε να χρησιμοποιήσετε τη λειτουργία `concatenate 'ή άλλες λειτουργίες χειραγώγησης κειμένου για να συνδυάσετε τους παράγοντες από τις στήλες C και D σε μία μόνο στήλη, αφαιρώντας τα αντίγραφα ανάλογα με τις ανάγκες. Αυτό είναι πιο προηγμένο, και η ταξινόμηση και η χρήση της λειτουργίας `μοναδικής '(διαθέσιμη σε νεότερες εκδόσεις Excel) μπορεί να είναι μια καθαρότερη λύση.
Μέθοδος 2:Χρήση VBA (για μεγαλύτερους αριθμούς)
Για πολύ μεγάλους αριθμούς, μια μακροεντολή VBA είναι πιο αποτελεσματική. Αυτή η μακροεντολή βρίσκει όλους τους παράγοντες και τους εξάγει σε μια στήλη.
1. Ανοίξτε τον επεξεργαστή VBA: Πατήστε ALT + F11.
2. Εισαγάγετε μια ενότητα: Μεταβείτε στο Insert> Module.
3. Επικολλήστε τον ακόλουθο κωδικό:
`` `vba
Sub FindFactors ()
Dim num τόσο πολύ, εγώ όσο πολύ καιρό
DIM παράγοντες ως παραλλαγή
num =εύρος ("a1"). Τιμή 'Λάβετε τον αριθμό από το Cell A1
Redim παράγοντες (1 έως 1)
Για i =1 έως int (sqr (num))
Εάν num mod i =0 τότε
Παράγοντες (Ubound (παράγοντες)) =i
Οι παράγοντες διατήρησης του Redim (1 έως ασήμαντες (παράγοντες) + 1)
Αν i * i <> num τότε
Παράγοντες (Ubound (παράγοντες)) =NUM / I
Οι παράγοντες διατήρησης του Redim (1 έως ασήμαντες (παράγοντες) + 1)
Τέλος εάν
Τέλος εάν
Στη συνέχεια εγώ
«Αφαιρέστε το τελευταίο κενό στοιχείο
Οι παράγοντες διατήρησης του Redim (1 έως ασήμαντες (παράγοντες) - 1)
«Εξάγετε τους παράγοντες στη στήλη Β, ξεκινώντας από το B1
Εύρος ("b1")
Τερματισμός
`` `
4. Εκτελέστε τη μακροεντολή: Πατήστε F5 ή κάντε κλικ στο κουμπί "Εκτέλεση" στον επεξεργαστή VBA. Βεβαιωθείτε ότι έχετε εισέλθει στον αριθμό στο Cell A1 πριν εκτελέσετε τη μακροεντολή.
Θυμηθείτε να ρυθμίσετε τις αναφορές κυττάρων ανάλογα με τις ανάγκες για να ταιριάζουν με τη διάταξη του υπολογιστικού φύλλου σας. Η μέθοδος VBA είναι σημαντικά ταχύτερη για μεγαλύτερους αριθμούς όπου η προσέγγιση που βασίζεται στη φόρμουλα θα γινόταν μη πρακτική. Επιλέξτε τη μέθοδο που ταιριάζει καλύτερα στις ανάγκες σας και το μέγεθος των αριθμών με τους οποίους εργάζεστε.
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα