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

Conas na príomhuimhreacha go léir a ghiniúint idir dhá uimhir ar leith in Excel?

In Excel, an ndearna tú iarracht riamh na príomhuimhreacha go léir a liostáil idir dhá uimhir ar leith? An t-alt seo, labhróidh mé faoi roinnt modhanna suimiúla chun déileáil leis an tasc seo.

Cruthaigh na príomhuimhreacha go léir idir dhá uimhir ar leith le foirmlí

Cruthaigh na príomhuimhreacha go léir idir dhá uimhir ar leith le Feidhm Shainithe ag Úsáideoir


mboilgeog cheart gorm saighead Cruthaigh na príomhuimhreacha go léir idir dhá uimhir ar leith le foirmlí

Comhcheangail an Sainmhínigh Ainm feidhm agus foirmlí, is féidir leat gach ceann de na huimhreacha príomha a liostáil nó a ghiniúint idir an dá uimhir shonracha. Déan mar a leanas le do thoil:

1. Cruthaigh ainm an chéad raoin le do thoil trí chliceáil Foirmlí > Bainisteoir Ainm, agus sa Bainisteoir Ainm dialóg, cliceáil Nua cnaipe, féach ar an scáileán:

liosta doc uimhreacha príomha 1

2. Sa an Ainm Nua bosca dialóige, sa Ainm bosca téacs, iontráil le do thoil rng mar ainm an raoin, agus ansin cuir isteach an fhoirmle seo: = ROW (INDIRECT (Bileog1! $ B $ 1 & ":" & Bileog1! $ B $ 2)) (Sheet1 an bhfuil do bhileog oibre reatha a d'úsáid tú, B1 agus B2 is iad na huimhreacha tosaigh agus deiridh a shonraigh tú) isteach sa Tagraíonn bosca téacs, ansin cliceáil OK cnaipe chun filleadh ar an iar-dialóg. Féach an pictiúr:

liosta doc uimhreacha príomha 2

3. Téigh ar cliceáil Nua cnaipe chun ainm raon eile a chruthú, sa Ainm Nua bosca dialóige, cuir isteach ainm príomh- isteach sa Ainm bosca téacs, agus ansin cuir isteach an fhoirmle seo: =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 é an chéad ainm raon a chruthaigh tú i gcéim 2) isteach sa Tagraíonn bosca téacs, féach an pictiúr:

liosta doc uimhreacha príomha 3

4. Ansin cliceáil OK agus dún na dialóga, agus roghnaigh colún amháin ar mhaith leat na príomhuimhreacha go léir a liostáil, agus cuir isteach an fhoirmle seo: = IFERROR (príomha, "")(príomh- an t-ainm raon a chruthaigh tú i gcéim 3) isteach sa bharra foirmle, agus ansin brúigh CTRL+SHIFT+ENTER eochracha le chéile, liostaítear na príomhuimhreacha go léir idir an dá uimhir a thugtar mar an scáileán a leanas a thaispeántar:

liosta doc uimhreacha príomha 4


mboilgeog cheart gorm saighead Cruthaigh na príomhuimhreacha go léir idir dhá uimhir ar leith le Feidhm Shainithe ag Úsáideoir

Má tá an chéad mhodh deacair go leor, anseo, is féidir leat a Feidhm Sainithe ag an Úsáideoir chun é a réiteach.

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil Fuinneog.

Cód VBA: Cruthaigh na príomhuimhreacha go léir idir dhá uimhir shonracha:

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. Ansin sábháil agus dún an cód seo, téigh ar ais chuig an mbileog oibre, iontráil an fhoirmle seo le do thoil: = príomha (10,100) (10 is é an uimhir tosaigh, agus 100 an uimhir dheiridh ar mhaith leat na huimhreacha príomha a fháil eatarthu, is féidir leat iad a athrú de réir do riachtanas), agus ansin brúigh Iontráil eochair, agus taispeántar na huimhreacha príomha go léir i gcill amháin, féach an scáileán:

liosta doc uimhreacha príomha 5


Na hUirlisí Táirgiúlachta Oifige is Fearr

Réitíonn Kutools for Excel an chuid is mó de do chuid Fadhbanna, agus Méadaíonn sé do Tháirgiúlacht 80%

  • Athúsáid: Cuir isteach go tapa foirmlí casta, cairteacha agus aon rud a d'úsáid tú roimhe seo; Cealla a Chriptiú le pasfhocal; Cruthaigh Liosta Ríomhphoist agus seol ríomhphoist ...
  • Barra Foirmle Super (cuir línte iolracha téacs agus foirmle in eagar go héasca); Leagan Amach Léitheoireachta (líon mór cealla a léamh agus a chur in eagar go héasca); Greamaigh go dtí an Raon Scagtha...
  • Cumaisc Cealla / Sraitheanna / Colúin gan Sonraí a chailleadh; Ábhar Cealla Scoilt; Comhcheangail Sraitheanna / Colúin Dúblacha... Cill Dúblach a Chosc; Déan comparáid idir Ranganna...
  • Roghnaigh Dúblach nó Uathúil Sraitheanna; Roghnaigh Blank Rows (tá na cealla uile folamh); Aimsigh Super agus Fuzzy Aimsigh i go leor Leabhar Oibre; Roghnaigh go randamach ...
  • Cóip Díreach Cealla Il gan tagairt fhoirmle a athrú; Tagairtí Cruthaigh Auto chuig Bileoga Il; Cuir Urchair isteach, Boscaí Seiceála agus go leor eile ...
  • Sliocht Téacs, Cuir Téacs leis, Bain de réir Poist, Bain Spás; Subtotals Paging a chruthú agus a phriontáil; Tiontaigh Idir Ábhar Cealla agus Tráchtanna...
  • Scagaire Super (scéimeanna scagaire a shábháil agus a chur i bhfeidhm ar bhileoga eile); Ard-Sórtáil de réir míosa / seachtaine / lae, minicíocht agus níos mó; Scagaire Speisialta le cló trom, iodálach ...
  • Comhcheangail Leabhair Oibre agus Bileoga Oibre; Cumaisc Táblaí bunaithe ar eochaircholúin; Roinn Sonraí i Ilbhileoga; Baisc Tiontaigh xls, xlsx agus PDF...
  • Níos mó ná 300 gné chumhachtach. Tacaíonn Office / Excel 2007-2021 agus 365. Tacaíonn sé le gach teanga. Imscaradh éasca i d'fhiontar nó d'eagraíocht. Gnéithe iomlána triail saor in aisce 30-lá. Ráthaíocht airgid ar ais 60-lá.
cluaisín kte 201905

Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
bun officetab
Sórtáil tuairimí de réir
Comments (3)
Níl rátálacha ar bith fós. Bí ar an gcéad duine a rátáil!
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Fo-ghintearprimenumbersbetween() starting_number = 1 'luach ionchuir anseo last_number = 2000 'luach ionchuir anseo príomh-uimhreacha =" Chun a = starting_number Go last_number Le haghaidh b = 2 Go a Más rud é a - b * Int(a / b) = 0 Agus ab Ansin Scoir Do Eile Má tá a = b Ansin príomhuimhreacha = príomhuimhreacha & " " & a Deireadh Má Chríochnaigh Ar Aghaidh b Ar Aghaidh a MsgBox príomh-uimhreacha Fo-fheidhm Deiridh príomhuimhreacha idir(starting_number, last_number) príomhuimhreacha="" Chun a = ag tosú_uimhir Go last_number Le haghaidh b = 2 Chun a Más rud é a - b * Int(a / b) = 0 Agus ab Scoir Eile Eile Más rud é a = b Ansin príomhuimhreacha = príomhuimhreacha & " " & Deireadh Má Chríochnaigh Ar Aghaidh b Ar Aghaidh a primenumbersbetween = Príomhuimhreacha Feidhm Deiridh 'chun seiceáil an bhfuil tá uimhir príomha Fo ISPRIME() number_to_be_checked = 102 'luach ionchuir anseo Le haghaidh b = 2 Go number_to_be_checked Má tá number_to_be_checked - b * Int(number_to_be_checked / b) = 0 Agus _ number_to_be_checked b Ansin MsgBox "Ní féidir a roinnt le " & b Exit Fo Eile Má number_to_be_checked = b Ansin MsgBox "Prime" Críoch Má Chríochnaigh Ar Aghaidh b Deireadh S ub 'chun seiceáil an bhfuil uimhir phríomhfheidhm ISPRIME2(number_to_be_checked) Le haghaidh b = 2 Go number_to_be_checked Má tá number_to_be_checked - b * Int(number_to_be_checked / b) = 0 Agus _ number_to_be_checked b Ansin ISPRIME2 = "Ní Príomh. Inroinnte le " & b Scoir Feidhm Eile Má number_to_be_checked = b Ansin ISPRIME2 = "Príomh" Deireadh Má Chríochnaigh Ar Aghaidh b Feidhm Deiridh
Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú




Fo Deireadh

Rinne an modhnóir ar an láithreán an trácht seo a íoslaghdú
Fo-ghiniúintprimenumbersbetween3() starting_number = 1 'luach ionchuir anseo last_number = 10000 'luach ionchuir anseo príomh-uimhreacha =" Chun a = starting_number Go last_number c = a Do b = 2 Chun c Más Mod b = 0 Agus cb Ansin Scoir Chun Eile Más rud é b = c Ansin príomhuimhreacha = príomhuimhreacha & " " & Scoir Eile Más Babhta(a / (b + 1)) + 1 > b Ansin c = Babhta(a / (b + 1))) + 1 Deireadh Má Chríochnaigh Más Ar Aghaidh b Ar Aghaidh le príomhuimhreacha MsgBox Fofheidhm Deiridh PRIMENUMBERSBETWEEN3(starting_number, last_number) primenumbers="" Chun a = starting_number Go last_number c = a Do b = 2 Chun c Más Mod b = 0 Agus cb Ansin Scoir Chun Eile Más b = c Ansin príomhuimhreacha = príomhuimhreacha & " " & Scoir Chun Eile Más Babhta(a / (b + 1))) + 1 > b Ansin c = Babhta(a / (b + 1)) + 1 Deireadh Má Chríochnaigh Más Ar Aghaidh b Ar Aghaidh a PRIMENUMBERSBETWEEN3 = príomhuimhreacha Feidhm Deiridh Fo ISPRIME3() number_to_be_checked = 15485863 'luach ionchuir anseo c = number_to_be_checked Le haghaidh b = 2 Go c Má number_to_be_checked Mod b = 0 Agus cb Ansin MsgBox "Ní féidir a roinnt le "& b.Scoir Fo Eile Má b = c Ansin MsgBox "Príomh" Scoir Fo Eile Más Babhta(number_to_be_checked / (b + 1)) + 1> b Ansin c = Babhta(number_to_be_checked / (b + 1))) + 1 Deireadh Má Críochnaigh Má Deireadh Más Ar Aghaidh b Deireadh Fo
Níl aon tráchtanna curtha suas anseo go fóill

Lean orainn

Cóipcheart © 2009 - www.extendoffice.com. | Gach ceart ar cosaint. Cumhachtaithe ag ExtendOffice. | léarscáil an tSuímh
Is trádmharcanna nó trádmharcanna cláraithe de chuid Microsoft Corporation sna Stáit Aontaithe agus / nó i dtíortha eile iad lógó Office agus Office.
Cosanta ag Sectigo SSL