In Excel, is féidir leat an ghné chumhachtach Aimsigh agus Ionadaigh a chur i bhfeidhm chun sraitheanna atá bunaithe ar luach áirithe cille a bhaint go héasca. Déan mar a leanas le do thoil:

1. Roghnaigh an raon ina mbainfidh tú sraitheanna bunaithe ar luach cille áirithe, agus oscail an bosca dialóige Aimsigh agus Ionadaigh le brúigh an Ctrl + F eochracha ag an am céanna.

2. Sa bhosca dialóige Aimsigh agus Ionadaigh, clóscríobh an luach cille áirithe le do thoil (inár gcás féin, iontráilimid an Só) isteach sa Find what bosca, agus cliceáil ar an Find All cnaipe. Féach an chéad phictiúr thíos:

3. Roghnaigh na torthaí cuardaigh go léir ag bun an bhosca dialóige Aimsigh agus Ionadaigh, agus dún an bosca dialóige seo. (nótaí: Is féidir leat ceann de thoradh cuardaigh a roghnú, agus ansin Ctrl + A eochracha chun na torthaí aimsithe go léir a roghnú. Féach an dara pictiúr thuas.)
Agus ansin is féidir leat a fheiceáil go roghnaítear na cealla go léir ina bhfuil an luach áirithe.

4. Téigh ar aghaidh chun cliceáil ar dheis ar chealla roghnaithe agus roghnaigh an Delete ón roghchlár cliceáil ar dheis. Agus ansin seiceáil an Entire row rogha sa bhosca dialóige popping up Delete, agus cliceáil ar an OK cnaipe. Anois feicfidh tú go mbaintear na cealla uile ina bhfuil an luach áirithe. Féach na scáileáin scáileáin thíos:

Agus ansin scriosadh sraitheanna iomlána bunaithe ar an luach áirithe cheana féin.

Leis an gcód VBA seo a leanas, is féidir leat na sraitheanna le luach cille áirithe a scriosadh go tapa, déan na céimeanna seo a leanas le do thoil:

1. Brúigh an Alt + F11 eochracha ag an am céanna le hoscailt Microsoft Visual Basic for applications fuinneog,

2. Cliceáil Insert > Module, agus an cód seo a leanas a ionchur sa Mhodúl:

VBA: Bain sraitheanna iomlána bunaithe ar luach cille

Sub DeleteRows()
'Updateby20211217
Dim rng As Range
Dim InputRng As Range
Dim DeleteRng As Range
Dim DeleteStr As String
Dim xTitleId As String
Dim xArr
Dim xF As Integer
Dim xWSh As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set rng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, rng.Address, Type:=8)
If InputRng Is Nothing Then Exit Sub
DeleteStr = Application.InputBox("Delete Text", xTitleId, Type:=2)
Set xWSh = InputRng.Worksheet
For Each rng In InputRng
    If rng.Value = DeleteStr Then
        If DeleteRng Is Nothing Then
            Set DeleteRng = rng
        Else
            Set DeleteRng = Application.Union(DeleteRng, rng)
            Set DeleteRng = DeleteRng.EntireRow
        End If
    End If
Next
xArr = Split(DeleteRng.AddressLocal, ",")
DeleteRng.Select
DeleteRng.Delete
For xF = UBound(xArr) To 0 Step -1
    Set DeleteRng = xWSh.Range(xArr(xF))
    DeleteRng.Delete
Next
End Sub

3. Ansin cliceáil ar an Run cnaipe chun an cód a rith.

4. Sa bhosca dialóige aníos, roghnaigh an raon ina mbainfidh tú sraitheanna bunaithe ar an luach áirithe, agus cliceáil ar an OK cnaipe.

5. I mbosca dialóige eile, clóscríobh an luach áirithe a bhainfidh tú sraitheanna bunaithe air, agus cliceáil ar an OK cnaipe. Féach an pictiúr:

Agus ansin feicfidh tú gur scriosadh sraitheanna iomlána bunaithe ar an luach sonraithe cheana féin.

Má tá tú suiteáilte agat Kutools for Excel, a Select Specific Cells is féidir le gné cabhrú leat na sraitheanna le luach sonrach a scriosadh go tapa. Déan mar a leanas le do thoil:

1. Roghnaigh an raon a bhainfidh tú sraitheanna bunaithe ar an luach áirithe, agus cliceáil Kutools > Select > Select Specific Cells. Féach an pictiúr:

2. Sa bhosca dialóige Oscail Roghnaigh Cealla Sonraithe, seiceáil le do thoil Entire row rogha, roghnaigh Contains ó Specific type liosta anuas, cuir an luach sonraithe isteach sa bhosca ceart, agus cliceáil ar an Ok cnaipe (Féach an pictiúr thuas).
Tar éis duit an ghné seo a chur i bhfeidhm, popfaidh bosca dialóige amach agus taispeánfaidh sé duit cé mhéad cealla a fuarthas bunaithe ar na critéir shonraithe. Cliceáil le do thoil ar an OK cnaipe chun é a dhúnadh.

3. Anois roghnaítear sraitheanna iomlána leis an luach áirithe. Cliceáil ar dheis ar na sraitheanna roghnaithe, agus cliceáil ar an Delete ón roghchlár cliceáil ar dheis. Féach an pictiúr thíos:

nótaí: Is é seo Select Specific Cells tacaíochtaí gné chun sraitheanna a scriosadh de réir luachanna áirithe nó dhó. Chun sraitheanna atá bunaithe ar dhá luach shonraithe a scriosadh, sonraigh luach eile sa Specific type cuid den bhosca dialóige Roghnaigh Cealla Sonracha mar a thaispeántar an scáileán a leanas:

I roinnt cásanna, b’fhéidir go mbeidh ort sraitheanna atá bunaithe ar luachanna iolracha cille a bhaint ó cholún / liosta eile in Excel. Seo a thabharfaidh mé isteach Kutools for Excel's Select Same & Different Cells gné chun é a réiteach go tapa gan stró.

1. Cliceáil Kutools > Select > Select Same & Different Cells chun an bosca dialóige Select Same & Different Cells a oscailt.

2. San oscailt Select Same & Different Cells bosca dialóige, déan mar a leanas le do thoil (féach an pictiúr):

(1) Sa Find values in bosca, roghnaigh an colún le do thoil ina bhfaighidh tú na luachanna áirithe;
(2) Sa According to bosca, roghnaigh an colún / liosta le luachanna iolracha scriosfaidh tú sraitheanna bunaithe air;
(3) Sa Based on alt, seiceáil an Each row rogha;
(4) Sa Find alt, seiceáil an Same Values rogha;
(5) Seiceáil an Select entire rows rogha ag bun an bhosca dialóige oscailte.
nótaí: Má tá an ceanntásc céanna in dhá cholún shonraithe, seiceáil an My data has headers rogha.

3. Cliceáil ar an Ok cnaipe chun an fóntais seo a chur i bhfeidhm. Agus ansin tagann bosca dialóige amach agus taispeánann sé cé mhéad sraitheanna a roghnaíodh. Cliceáil ar an OK cnaipe chun é a dhúnadh.

Agus ansin roghnaíodh gach sraitheanna ina bhfuil luachanna i measc an liosta shonraithe.

4. Cliceáil Home > Delete > Delete Sheet Rows gach sraitheanna roghnaithe a scriosadh.