Hoe alle priemgetallen tussen twee gegeven getallen in Excel te genereren?
Heb je in Excel ooit geprobeerd om alle priemgetallen tussen twee gegeven getallen op te sommen? In dit artikel zal ik enkele interessante methoden bespreken om met deze taak om te gaan.
Genereer alle priemgetallen tussen twee gegeven getallen met formules
Genereer alle priemgetallen tussen twee gegeven getallen met door de gebruiker gedefinieerde functie
Genereer alle priemgetallen tussen twee gegeven getallen met formules
Combinatie van de Definieer naam functie en formules, kunt u alle priemgetallen tussen de twee specifieke getallen weergeven of genereren. Ga als volgt te werk:
1. Maak de eerste bereiknaam door op te klikken Formules > Name Manager, en in de Name Manager dialoogvenster, klik New knop, zie screenshot:
2. In de Nieuwe naam dialoogvenster, in de Naam tekstvak, gelieve in te voeren RNG als bereiknaam en voer vervolgens deze formule in: = RIJ (INDIRECT (Blad1! $ B $ 1 & ":" & Blad1! $ B $ 2)) (Sheet1 is je huidige werkblad dat je hebt gebruikt, B1 en B2 zijn de begin- en eindnummers die u hebt opgegeven) in de Verwijst naar tekstvak en klik op OK knop om terug te keren naar het vorige dialoogvenster. Zie screenshot:
3. Blijf klikken New om een andere bereiknaam te maken, in de Nieuwe naam dialoogvenster, voer een naam in eerste in de Naam tekstvak en voer vervolgens deze formule in: =SMALL(IF(MMULT(--(IF(rng>TRANSPOSE(rng-Sheet1!$B$1+2),MOD(rng,(rng>TRANSPOSE(rng-Sheet1!$B$1+2))*TRANSPOSE(rng-Sheet1!$B$1+2)))=0),rng-Sheet1!$B$1+2)=0,rng),ROW(INDIRECT("1:"&Sheet1!$B$2))) (RNG is de eerste bereiknaam die u in stap 2) heeft aangemaakt in de Verwijst naar tekstvak, zie screenshot:
4. Dan klikken OK en sluit de dialoogvensters en selecteer een kolom waarvan u alle priemgetallen wilt weergeven, en voer deze formule in: = IFERROR (prime, "")(eerste is de bereiknaam die u in stap 3) hebt gemaakt in de formulebalk en druk vervolgens op CTRL+SHIFT+ENTER toetsen bij elkaar, worden alle priemgetallen tussen de gegeven twee getallen weergegeven als het volgende screenshot:
Genereer alle priemgetallen tussen twee gegeven getallen met door de gebruiker gedefinieerde functie
Als de eerste methode enigszins moeilijk is, kunt u hier een Door de gebruiker gedefinieerde functie om het op te lossen.
1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.
2. Klikken Invoegen > Moduleen plak de volgende code in het Module Venster.
VBA-code: genereer alle priemgetallen tussen twee specifieke nummers:
Function PRIME(St, En As Long)
'Updateby Extendoffice 20160613
Dim num As String
For n = St To En
For m = 2 To n - 1
If n Mod m = 0 Then GoTo 20:
Next m
num = num & n & ","
20:
Next n
PRIME = num
End Function
3. Sla vervolgens deze code op en sluit deze, ga terug naar het werkblad en voer deze formule in: = prime (10,100) (10 is het startnummer, en 100 is het eindnummer waartussen u de priemgetallen wilt hebben, u kunt ze naar wens wijzigen), en druk vervolgens op Enter sleutel, en alle priemgetallen worden in één cel weergegeven, zie screenshot:
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!