Hogyan ellenőrizhető, hogy a szám prímszám-e az Excelben?
Mint mindannyian tudjuk, a prímszám egy természetes szám, amely csak két különálló természetes számosztót tartalmaz: egyet és önmagát. Ha van egy munkalapon számlistája, hogyan ellenőrizheti, hogy a számok prímszámok-e?
A tömbképlettel ellenőrizze, hogy egy szám prímszám-e
A Felhasználó által definiált funkcióval ellenőrizze, hogy egy szám prímszám-e
A tömbképlettel ellenőrizze, hogy egy szám prímszám-e
A következő képlet segíthet azonosítani a számot, függetlenül attól, hogy ez prímszám-e, vagy sem, kérjük, tegye a következőket:
1. Írja be a következő képletet egy üres cellába - például C2 az adatok mellé:
=IF(A2=2,"Prime",IF(AND(MOD(A2,ROW(INDIRECT("2:"&ROUNDUP(SQRT(A2),0))))<>0),"Prime","Not Prime")) (A2 a cella tartalmazza az ellenőrizni kívánt számot), majd nyomja meg az gombot Ctrl + Shift + Enter gombokat együtt, és megkapja az eredményt, ha a szám elsődleges, akkor a „Prime” jelenik meg a cellában, ha nem, akkor a „Not Prime” jelenik meg, lásd a képernyőképet:
2. Ezután válassza ki a C2 cellát, és húzza lefelé a kitöltő fogantyút azokra a cellákra, amelyeken alkalmazni szeretné ezt a képletet, és az összes szám azonosításra kerül, ha elsőszám vagy nem. Lásd a képernyőképet:
A Felhasználó által definiált funkcióval ellenőrizze, hogy egy szám prímszám-e
A következő Felhasználó által definiált funkció segíthet a számok ellenőrzésében, ha elsődleges vagy sem, kérjük, tegye a következőket:
1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.
2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablak.
VBA kód: Ellenőrizze, hogy egy szám prím-e vagy sem:
Function CheckPrime(Numb As Single) As Boolean
'Updateby Extendoffice
Dim X As Long
If Numb < 2 Or (Numb <> 2 And Numb Mod 2 = 0) _
Or Numb <> Int(Numb) Then Exit Function
For X = 3 To Sqr(Numb) Step 2
If Numb Mod X = 0 Then Exit Function
Next
CheckPrime = True
End Function
3. Ezután mentse el és zárja be ezt a kódot, menjen vissza a munkalapra, és írja be ezt a képletet: = checkprime (A2) egy üres cellába a számlista mellett, majd húzza lefelé a kitöltő fogantyút azokhoz a cellákhoz, amelyekben ezt a képletet kívánja tartalmazni. Ha a szám elsődleges szám, akkor IGAZ, ha nem, akkor FALSE jelenik meg, lásd a képernyőképet:
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!