Note: The other languages of the website are Google-translated. Back to English

Sut i wirio a yw'r rhif yn rhif cysefin yn Excel?

Fel y gwyddom i gyd, rhif naturiol yw rhif cysefin sy'n cynnwys dim ond dau rannwr rhif naturiol penodol: Un ac ef ei hun. Os oes gennych chi restr o rifau mewn taflen waith, sut allech chi wirio a yw'r rhifau yn rhifau cysefin?

Gwiriwch a yw rhif yn rhif cysefin gyda fformiwla arae

Gwiriwch a yw rhif yn rhif cysefin gyda Swyddogaeth Diffiniedig Defnyddiwr


swigen dde glas saeth Gwiriwch a yw rhif yn rhif cysefin gyda fformiwla arae

Gall y fformiwla ganlynol eich helpu i nodi'r rhif p'un a yw'n rhif cysefin ai peidio, gwnewch fel hyn:

1. Rhowch y fformiwla ganlynol i mewn i gell wag - C2 er enghraifft wrth ochr eich data:

=IF(A2=2,"Prime",IF(AND(MOD(A2,ROW(INDIRECT("2:"&ROUNDUP(SQRT(A2),0))))<>0),"Prime","Not Prime")) (A2 ydy'r gell yn cynnwys y rhif rydych chi am ei wirio), ac yna pwyswch Ctrl + Shift + Enter allweddi gyda'i gilydd, a byddwch yn cael y canlyniad, os yw'r rhif yn gysefin, bydd yn arddangos “Prime” yn y gell, os na, bydd “Not Prime” yn cael ei arddangos, gweler y screenshot:

doc gwirio a yw cysefin 1

2. Yna dewiswch y gell C2, a llusgwch y handlen llenwi i lawr i'r celloedd rydych chi am gymhwyso'r fformiwla hon, a bydd yr holl rifau'n cael eu nodi os yw'n rhif cysefin ai peidio. Gweler y screenshot:

doc gwirio a yw cysefin 2


swigen dde glas saeth Gwiriwch a yw rhif yn rhif cysefin gyda Swyddogaeth Diffiniedig Defnyddiwr

Mae'r canlynol Swyddogaeth Diffiniedig Defnyddiwr hefyd yn gallu eich helpu i wirio'r rhifau os ydynt yn gysefin ai peidio, gwnewch fel a ganlyn:

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Ffenestr Modiwl.

Cod VBA: Gwiriwch a yw rhif yn gysefin ai peidio:

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. Yna arbedwch a chau'r cod hwn, ewch yn ôl i'r daflen waith, a nodi'r fformiwla hon: = amser gwirio (A2) i mewn i gell wag wrth ymyl eich rhestr rifau, ac yna llusgwch y ddolen llenwi i lawr i'r celloedd rydych chi am gynnwys y fformiwla hon, os yw'r rhif yn rhif cysefin, bydd yn arddangos GWIR, os na, bydd yn arddangos ANWIR, gweler y screenshot:

doc gwirio a yw cysefin 3


Yr Offer Cynhyrchedd Swyddfa Gorau

Mae Kutools for Excel yn Datrys y rhan fwyaf o'ch Problemau, ac yn Cynyddu Eich Cynhyrchedd 80%

  • Ailddefnyddio: Mewnosod yn gyflym fformwlâu cymhleth, siartiau ac unrhyw beth rydych chi wedi'i ddefnyddio o'r blaen; Amgryptio Celloedd gyda chyfrinair; Creu Rhestr Bostio ac anfon e-byst ...
  • Bar Fformiwla Gwych (golygu llinellau lluosog o destun a fformiwla yn hawdd); Cynllun Darllen (darllen a golygu nifer fawr o gelloedd yn hawdd); Gludo i'r Ystod Hidlo...
  • Uno Celloedd / Rhesi / Colofnau heb golli Data; Cynnwys Celloedd Hollt; Cyfuno Rhesi / Colofnau Dyblyg... Atal Celloedd Dyblyg; Cymharwch y Meysydd...
  • Dewiswch Dyblyg neu Unigryw Rhesi; Dewiswch Blank Rows (mae pob cell yn wag); Darganfyddiad Gwych a Darganfyddiad Niwlog mewn Llawer o Lyfrau Gwaith; Dewis ar Hap ...
  • Copi Union Celloedd Lluosog heb newid cyfeirnod fformiwla; Auto Creu Cyfeiriadau i Daflenni Lluosog; Mewnosod Bwledi, Blychau Gwirio a mwy ...
  • Testun Detholiad, Ychwanegu Testun, Tynnu yn ôl Swydd, Tynnwch y Gofod; Creu ac Argraffu Subtotals Paging; Trosi rhwng Cynnwys a Sylwadau Celloedd...
  • Hidlo Super (arbed a chymhwyso cynlluniau hidlo i ddalenni eraill); Trefnu Uwch yn ôl mis / wythnos / dydd, amlder a mwy; Hidlo Arbennig gan feiddgar, italig ...
  • Cyfuno Llyfrau Gwaith a Thaflenni Gwaith; Uno Tablau yn seiliedig ar golofnau allweddol; Rhannwch Ddata yn Daflenni Lluosog; Trosi Swp xls, xlsx a PDF...
  • Mwy na 300 o nodweddion pwerus. Yn cefnogi Swyddfa / Excel 2007-2019 a 365. Yn cefnogi pob iaith. Defnydd hawdd yn eich menter neu sefydliad. Nodweddion llawn treial am ddim 30 diwrnod. Gwarant arian yn ôl 60 diwrnod.
tab kte 201905

Mae Tab Office yn Dod â rhyngwyneb Tabbed i'r Swyddfa, a Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
gwaelod officetab
sylwadau (21)
Dim sgôr eto. Byddwch y cyntaf i sgorio!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, dwi'n hoffi'ch erthygl. Diolch yn fawr. Dangosodd fy mhrofion syml fod 99 yn rhif cysefin tra nad yw 99 gan fod 99 wedi'i rannu â 3 a 33 yn ogystal ag 1 a 99. A allwch chi roi gwybod i mi beth sydd o'i le ar fy llawdriniaeth?
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Nid yw'r fformiwla arae uchod yn gweithio ond mae'r swyddogaeth Diffiniedig Defnyddiwr yn gwneud hynny ac roedd yn help mawr. Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Nid yw'r fformiwla arae yn gweithio ond mae'r swyddogaeth a ddiffinnir gan y Defnyddiwr yn gwneud hynny ac roedd yn ddefnyddiol iawn. Diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Nid yw'n ymddangos bod y swyddogaeth a ddiffinnir gan y defnyddiwr yn gweithio ar gyfer rhifau uwchlaw ~16777213
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Is-generynprimenumbersbetween() starting_number = 99990 'gwerth mewnbwn yma last_number = 99999 'gwerth mewnbwn yma rhifau cysefin =" Am a = starting_number I last_number Ar gyfer b = 2 I a Os a - b * Int(a / b) = 0 Ac ab Yna Gadael Ar Gyfer Arall Os a = b Yna rhifau cysefin = rhifau cysefin & " "& Diwedd Os Diwedd Os Nesaf b Nesaf a MsgBox rhifau cysefin Is-swyddogaeth Diwedd rhifau cysefin rhwng(starting_number, last_number) primenumbers="" Ar gyfer a = start_number I last_number Ar gyfer b = 2 I a Os a - b * Int(a / b) = 0 Ac ab Yna Gadael Am Arall Os a = b Yna rhifau cysefin = rhifau cysefin & " " & Diwedd Os Diwedd Os Nesaf b Nesaf a primenumbersbetween = rhifau cysefin Swyddogaeth Diwedd ' i wirio os mae rhif yn gysefin Is ISPRIME() number_to_be_checked = 102 'gwerth mewnbwn yma Ar gyfer b = 2 I number_to_be_checked Os number_to_be_checked - b * Int(number_to_be_checked / b) = 0 A _ number_to_be_checked b Yna MsgBox "Ddim yn Rhannadwy gan " & b Arall. Is Arall Os Nifer_to_be_checked = b Yna MsgBox "Prime" Diwedd Os Diwedd Os Nesaf b Diwedd Is 'i wirio a yw rhif yn gysefin Swyddogaeth ISPRIME2(number_to_be_checked) Ar gyfer b = 2 I number_to_be_checked Os number_to_be_checked - b * Int(number_to_be_checked / b) = 0 A _ number_to_be_checked b Yna ISPRIME2 = " Ddim yn Brif. Rhanadwy gan " & b Gadael Swyddogaeth Arall Os number_to_be_checked = b Yna ISPRIME2 = "Prime" Diwedd Os Diwedd Os Nesaf b Diwedd Swyddogaeth
Lleihawyd y sylw hwn gan y safonwr ar y wefan
dyma fy fersiwn cyflymaf Is-generynprimenumbersbetween3() starting_number = 1 'gwerth mewnbwn yma last_number = 30000 'gwerth mewnbwn yma rhifau cysefin =" Am a = rhif cychwyn I last_number c = a Ar gyfer b = 2 To c Os Mod b = 0 A cb Yna Gadael Am Arall Os b = c Yna rhifau cysefin = rhifau cysefin & " " & Gadael Ar Gyfer Arall Os Rownd(a / (b + 1)) + 1 > b Yna c = Rownd(a / (b + 1))) + 1 Diwedd Os Diwedd Os Diwedd Os yw Nesaf b Nesaf a MsgBox rhifau cysefin Diwedd Is Is ISPRIME3() number_to_be_checked = 2000000000 'gwerth mewnbwn yma c = number_to_be_checked Ar gyfer b = 2 To c Os number_to_be_checked Mod b = 0 A cb Yna MsgBox "Ddim yn Prime. Rhannadwy gyda" &b Arall Os b = c Yna MsgBox "Prime" Gadael Is Arall Os Rownd(number_to_be_checked / (b + 1)) + 1> b Yna c = Rownd(number_to_be_checked / (b + 1))) + 1 Diwedd Os Diwedd Os Diwedd Os Nesaf b Diwedd Is
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Nid yw eich fformiwla yn gweithio. ae. NID yw 1681 yn gysefin ond yn ôl fformiwla y mae.
=IF(A2=2,"Prime",IF(AND(MOD(A2,ROW(INDIRECT("2:"&ROUNDUP(SQRT(A2),0))))<>0),"Prime","Not Prime"))
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Ionawr,
Mae'r fformiwla uchod yn gywir, ar ôl pastio'r fformiwla i mewn i gell, dylech wasgu Ctrl + Shift + Enter allweddi gyda'i gilydd, nid dim ond Enter allweddol.
Rhowch gynnig arall arni, diolch!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Oedd, dyna oedd yr achos gyda CSE. Diolch (mae'n sefydlog nawr).
https://superuser.com/questions/674566/when-to-use-ctrlshiftenter-and-when-to-use-enter-in-excel

Amrywiad Tsiec Btw i:
=IF(A2=2,"Prime",IF(AND(MOD(A2,ROW(INDIRECT("2:"&ROUNDUP(SQRT(A2),0))))<>0),"Prime","Not Prime"))
yw:
=KDYŽ(A2=2;"Prime";KDYŽ(A(MOD(A2;ŘÁDEK(NEPŘÍMÝ.ODKAZ("2:"&ROUNDUP(ODMOCNINA(A2);0))))<>0);"Prime";"Not Prime"))

Cymharwch: https://imgur.com/a/4MgeV
Lleihawyd y sylw hwn gan y safonwr ar y wefan
wel nid yw 4095 yn gysefin. serch hynny mae'n rhoi canlyniad fel cysefin. ei anghywir.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, vaibhav,
Pan fyddwch yn pastio uchod fformiwla, dylech bwyso Ctrl + Shift + Enter allweddi gyda'i gilydd, nid yn unig Enter allweddol, rhowch gynnig arall arni.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Mae gwall cyfeirio pan fyddwch chi'n teipio rhifau sydd â mwy na 12 digid.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Nathan,
Fel y dywedasoch, pan fydd y niferoedd yn hwy na 12 digid, bydd yn dod yn nodiant gwyddonol. Ni ddefnyddir y fformiwla ar gyfer y fformatio hwn.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Do fe weithiodd e fe wnes i Ctrl+Shift+Enter...!! Diolch..:D a oes ots gennych esbonio'r algorithm os gwelwch yn dda.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Hi.

Rwy'n defnyddio fersiwn Eidalaidd o Excel, felly nid yw'r fformiwla'n gweithio ac mae gennyf wall. Allwch chi fy helpu?

Diolch ymlaen llaw
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo, Gian,
Os nad yw'r fformiwla'n gweithio'n gywir i chi, gallwch gymhwyso'r ail ddull - Swyddogaeth Ddiffiniedig Defnyddiwr. Ceisiwch, gobeithio y gall eich helpu!
Diolch yn fawr!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Helo skyyang.
Os gall fod yn ddefnyddiol i ymchwilwyr eraill, rwy'n eich hysbysu fy mod wedi dod o hyd i'r ateb i'm problem yma => http://www.riolab.org/index.php?option=com_content&view=article&id=172&Itemid=68

Diolch yn fawr!
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yn bendant, mae problem gyda'r hafaliad hwn. Gwnes gopi/gludo uniongyrchol a gwirio ei fod yn gopi ffyddlon ond mae'n dal i fod â 9, 15, 21, 25, 33, 35 a 39 fel rhifau cysefin pan mae'n amlwg nad ydyn nhw. O archwilio'n gyflym mae'n ymddangos bod ffactorau 3 a 5 yn achosi rhyw fath o broblem. Mae'n fformiwla gymhleth iawn ar gyfer un gell - cymaint felly, ni allaf weithio allan beth mae'n ceisio ei wneud. Rwyf fel arfer yn torri pethau o'r fath yn gelloedd lluosog i wneud dadfygio yn haws (sydd, yn fy marn i, yn arfer gorau Excel).
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Yn bendant, mae problem gyda'r hafaliad hwn. Gwnes gopi/gludo uniongyrchol a gwirio ei fod yn gopi ffyddlon ond mae'n dal i fod â 9, 15, 21, 25, 33, 35 a 39 fel rhifau cysefin pan mae'n amlwg nad ydyn nhw. O archwilio'n gyflym mae'n ymddangos bod ffactorau 3 a 5 yn achosi rhyw fath o broblem. Mae'n fformiwla gymhleth iawn ar gyfer un gell - cymaint felly, ni allaf weithio allan beth mae'n ceisio ei wneud. Rwyf fel arfer yn torri pethau o'r fath i mewn i gelloedd lluosog i wneud dadfygio yn haws (sydd, yn fy marn i, yn arfer gorau Excel). Mae'n ymddangos bod y swyddogaeth yn gweithio, serch hynny.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
PEIDIWCH Â MYND I MEWN I'R FFORMIWLAS YN Y GELL. Dewiswch y gell ac yna gludwch y fformiwlâu yn y bar fformiwlâu a gwasgwch ctrl+shft+Enter. dylai roi { o amgylch y fformiwlâu} fel arall mae'n anghywir.
Lleihawyd y sylw hwn gan y safonwr ar y wefan
Craig, Diolch - mae hynny'n gweithio! Mae'n ddrwg gennyf, ni ddarllenais y cyfarwyddiadau yn ddigon gofalus.
Nid oes unrhyw sylwadau wedi'u postio yma eto
Gadewch eich sylwadau
Postio fel Gwestai
×
Graddiwch y swydd hon:
0   Cymeriadau
Lleoliadau a Awgrymir