Skip to main content

Conas sraitheanna a scriosadh má tá cill níos mó / níos lú ná luach áirithe in Excel?

Uaireanta b'fhéidir go mbeadh ort sraitheanna a scriosadh má tá cealla i gcolún sonraithe níos mó nó níos lú ná luach áirithe in Excel. Molfaidh an t-alt seo roinnt modhanna chun déileáil leis an bhfadhb seo.

Scrios sraitheanna má tá an chill níos mó/níos lú ná luach áirithe le cód VBA
Scrios sraitheanna má tá cill níos mó / níos lú ná luach áirithe le Kutools le haghaidh Excel
Scrios sraitheanna má tá cill níos mó / níos lú ná luach áirithe le Kutoos le haghaidh Excel


Scrios sraitheanna má tá an chill níos mó/níos lú ná luach áirithe le cód VBA

Ag glacadh leis gur mhaith leat sraitheanna iomlána a scriosadh má tá cill i gcolún D níos mó nó níos lú ná luach áirithe in Excel. Is féidir leat an cód VBA seo a leanas a rith chun é a bhaint amach.

1. Brúigh Eile + F11 eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Sa Microsoft Visual Basic d’Fheidhmchláir fuinneog, cliceáil Ionsáigh > modúl. Ansin cóipeáil agus greamaigh an cód VBA thíos i bhfuinneog an Chóid.

Cód VBA: Scrios sraitheanna má tá cill níos mó / níos lú ná luach áirithe in Excel

Public Sub ProcessData()
    Dim xRg As Range
    Dim xTxt As String
    On Error Resume Next
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If (xRg.Areas.Count > 1) Or (xRg.Columns.Count > 1) Then
        MsgBox "You can only select one column per time", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xRg.Range("A1").EntireRow.Insert
    Set xRg = xRg.Range("A1").Offset(-1).Resize(xRg.Rows.Count + 1)
    xRg.Range("A1") = "Temp"
    xRg.AutoFilter 1, ">30000"
    Set xRg = Application.Intersect(xRg, xRg.SpecialCells(xlCellTypeVisible))
    On Error GoTo 0
    If Not xRg Is Nothing Then xRg.EntireRow.Delete
End Sub

nótaí: Sa chód thuas, ciallaíonn > 30000 go scriosfaidh tú sraitheanna má tá cealla níos mó ná 30000 i gcolún sonraithe. Más mian leat sraitheanna a scriosadh má tá cealla níos lú ná luach áirithe, athraigh an comhartha > go < agus ansin shonraigh do luach.

3. Brúigh F5 eochair chun an cód a rith, sa phreabadh suas Kutools le haghaidh Excel bosca dialóige, roghnaigh an raon (colún singil) a gheobhaidh tú má tá cealla sa cholún seo níos mó nó níos lú ná luach áirithe. Agus ansin cliceáil ar an OK cnaipe. Féach an pictiúr:

Ansin scriostar láithreach gach sraitheanna le luach cille níos mó ná 30000 i gcolún D.


Scrios sraitheanna má tá cill níos mó / níos lú ná luach áirithe le Kutools le haghaidh Excel

An Roghnaigh Cealla Sonracha fóntais de Kutools le haghaidh Excel cabhrú leat gach sraith a roghnú le cealla níos mó nó níos lú ná luach áirithe i gcolún sonraithe, agus ansin is féidir leat gach sraith roghnaithe a scriosadh de láimh ag an am céanna.

Roimh iarratas a dhéanamh Kutools le haghaidh Excel, Le do thoil é a íoslódáil agus a shuiteáil ar dtús.

1. Roghnaigh an colún ar mhaith leat sraitheanna a scriosadh bunaithe ar, ansin cliceáil Kutools > Roghnaigh > Roghnaigh Cealla Sonracha. Féach an pictiúr:

2. Sa Roghnaigh Cealla Sonracha bosca dialóige, roghnaigh le do thoil Sraith iomlán sa Cineál roghnúcháin alt. Sa Cineál sonrach alt, roghnaigh Níos fearr ná or Níos lú ná ón gcéad liosta anuas, cuir an luach áirithe isteach sa chéad bhosca téacs eile, agus ansin cliceáil ar an OK cnaipe.

3. Ansin pops bosca dialóige a insint duit cé mhéad sraitheanna atá roghnaithe, le do thoil cliceáil ar an OK cnaipe. Agus is féidir leat a fheiceáil go bhfuil gach sraith le luach níos mó ná 30000 i gcolún D roghnaithe láithreach.

4. Cliceáil ar dheis ar cheann de na sraitheanna roghnaithe, ansin cliceáil Scrios ón roghchlár cliceáil ar dheis. Agus scriostar na sraitheanna roghnaithe go léir.

  Más mian leat triail saor in aisce (30 lá) a bheith agat ar an bhfóntas seo, cliceáil le do thoil chun é a íoslódáil, agus ansin téigh chun an oibríocht a chur i bhfeidhm de réir na gcéimeanna thuas.


Scrios sraitheanna má tá cill níos mó / níos lú ná luach áirithe le Kutoos le haghaidh Excel

Chomh maith leis an dá mhodh thuas, is féidir leat gach sraith a scagadh amach le cealla níos mó nó níos lú ná luach áirithe i gcolún sonraithe, agus ansin bain gach sraith scagtha leis an Scrios Sraitheanna & Colún Hidden (Infheicthe) fóntais de Kutools le haghaidh Excel.

Roimh iarratas a dhéanamh Kutools le haghaidh Excel, Le do thoil é a íoslódáil agus a shuiteáil ar dtús.

1. Roghnaigh an ceanntásc colún, ansin cliceáil Dáta > scagairí. Féach an pictiúr:

2. Cliceáil ar an tsaighead anuas sa cholún a scriosfaidh tú sraitheanna bunaithe orthu, ansin cliceáil Scagairí Uimhir > Níos fearr ná or Níos lú ná mar atá thíos ar an scáileán:

3. Sa AutoFilter Saincheaptha bosca dialóige, cuir isteach an uimhir áirithe tar éis an níos mó ná nó níos lú ná bosca, agus ansin cliceáil ar an OK cnaipe.

4. Ansin déantar na sraitheanna go léir a bhfuil cealla áirithe acu atá níos mó nó níos lú ná luach áirithe i gcolún D a scagadh amach. Is féidir leat na sraitheanna scagtha go léir a scriosadh trí na sonraí scagtha a roghnú agus ansin cliceáil Kutools > Scrios > Scrios Sraitheanna & Colúin Hidden (Infheicthe). Féach an pictiúr:

5. Sa Scrios Sraitheanna & Colúin Hidden (Infheicthe) bosca dialóige, déan cinnte go bhfuil an Sa Raon Roghnaithe roghnaítear rogha sa Feach isteach liosta anuas, roghnaigh Rónna sa Scrios cineál alt, sonraigh an rogha sraitheanna Infheicthe sa Cineál mionsonraithe alt, agus ar deireadh cliceáil ar an OK cnaipe.

6. Ansin scriostar láithreach na sraitheanna infheicthe go léir sa raon roghnaithe, is féidir leat an scagaire a chealú trí chliceáil Dáta > scagairí.

  Más mian leat triail saor in aisce (30 lá) a bheith agat ar an bhfóntas seo, cliceáil le do thoil chun é a íoslódáil, agus ansin téigh chun an oibríocht a chur i bhfeidhm de réir na gcéimeanna thuas.


Scrios sraitheanna má tá cill níos mó / níos lú ná luach áirithe le Kutools le haghaidh Excel


Earraí gaolmhara:

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...

Tuairisc


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á!
Comments (2)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Super. Thanks a lot.
Greetings from İstanbul
Rated 5 out of 5
This comment was minimized by the moderator on the site
Hi! How can I change your code (Delete Rows If Cell Is Greater/Less Than A Certain Value With VBA Code) if I would like it to work in every sheet in a workbook? I need it to delete the rows if date in column A is
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations