Conas liosta a scagadh agus na sraitheanna eile atá i bhfolach nó infheicthe in Excel a scriosadh?
Le haghaidh liosta scagtha, b’fhéidir go mbeidh ort na sraitheanna i bhfolach nó infheicthe a scriosadh d’fhonn na sonraí úsáideacha amháin a choinneáil. San Airteagal seo, taispeánfaimid duit modhanna chun an chuid eile de na sraitheanna i bhfolach nó infheicthe de liosta scagtha in Excel a scriosadh.
Scrios sraitheanna i bhfolach i mbileog oibre gníomhach le cód VBA
Scrios sraitheanna infheicthe den liosta scagtha agus roghnaigh na cealla infheicthe go léir
Scrios go héasca sraitheanna i bhfolach nó infheicthe den liosta scagtha le Kutools for Excel
Scrios sraitheanna i bhfolach i mbileog oibre gníomhach le cód VBA
Taispeánfaidh an chuid seo cód VBA duit chun sraitheanna i bhfolach a scriosadh ar bhileog ghníomhach. Déan mar a leanas le do thoil.
1. Gníomhachtaigh an bhileog oibre a theastaíonn uait chun sraitheanna i bhfolach a scriosadh, brúigh Eile + F11 eochracha ag an am céanna chun an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. I bhfuinneog Microsoft Visual Basic for Applications, cliceáil Ionsáigh > Modúil. Agus ansin cóipeáil agus greamaigh an cód VBA thíos i bhfuinneog an Mhodúil.
Cód VBA: Scrios sraitheanna i bhfolach
Sub RemoveHiddenRows()
Dim xRow As Range
Dim xRg As Range
Dim xRows As Range
On Error Resume Next
Set xRows = Intersect(ActiveSheet.Range("A:A").EntireRow, ActiveSheet.UsedRange)
If xRows Is Nothing Then Exit Sub
For Each xRow In xRows.Columns(1).Cells
If xRow.EntireRow.Hidden Then
If xRg Is Nothing Then
Set xRg = xRow
Else
Set xRg = Union(xRg, xRow)
End If
End If
Next
If Not xRg Is Nothing Then
MsgBox xRg.Count & " hidden rows have been deleted", , "Kutools for Excel"
xRg.EntireRow.Delete
Else
MsgBox "No hidden rows found", , "Kutools for Excel"
End If
End Sub3. Brúigh an F5 eochair chun an cód a rith. Má tá sraitheanna i bhfolach sa bhileog ghníomhach, tar éis an cód a rith, nochtfaidh bosca dialóige chun a insint duit cé mhéad sraitheanna i bhfolach a scriosadh. Cliceáil ar an OK cnaipe chun na sraitheanna i bhfolach a scriosadh. Féach an pictiúr:
Seachas sin, gheobhaidh tú an bosca dialóige seo a leanas tar éis duit an cód a rith.
nótaí: ní amháin gur féidir leis an gcód VBA thuas sraitheanna i bhfolach den liosta scagtha a scriosadh, ach freisin sraitheanna i bhfolach a chuir tú i bhfolach de láimh roimhe seo a scriosadh.
Scrios sraitheanna infheicthe den liosta scagtha agus roghnaigh gach gné cealla infheicthe
Chun sraitheanna infheicthe den liosta scagtha a scriosadh, déan mar a leanas le do thoil.
1. Roghnaigh gach sraitheanna scagtha amach, agus brúigh F5 eochair chun an Téigh go bosca dialóige, ansin cliceáil ar an speisialta cnaipe. Féach an pictiúr:
2. Sa Téigh go Speisialta bosca dialóige, seiceáil an Cealla infheicthe amháin rogha, agus ansin cliceáil ar an OK cnaipe.
3. Anois go roghnaítear na sraitheanna infheicthe go léir, cliceáil ar dheis ar an roghnú, agus ansin cliceáil Rothaí a scriosadh.
Go dtí seo, scriostar na sraitheanna infheicthe uile ón liosta scagtha.
Scrios go héasca sraitheanna i bhfolach nó infheicthe den liosta scagtha le Kutools for Excel
B’fhéidir nach iad na réitigh dhá mhodh thuas an réiteach dúil atá ag go leor úsáideoirí Excel, anseo tugtar uirlis áisiúil duit. Leis an Scrios Sraitheanna & Colúin Hidden (Infheicthe) fóntais de Kutools le haghaidh Excel, is féidir leat sraitheanna i bhfolach a scriosadh go héasca i raon / bileoga roghnaithe, bileog ghníomhach nó gach bileog oibre in 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. Mura dteastaíonn uait ach sraitheanna i bhfolach nó infheicthe de liosta scagtha a scriosadh, roghnaigh an raon scagtha de láimh, agus ansin cliceáil Kutools > Scrios > Scrios Sraitheanna & Colúin Hidden (Infheicthe). Féach an pictiúr:
2. Sa Scrios Sraitheanna & Colún Hidden (Infheicthe) bosca dialóige, coinnigh an Sa Raon roghnaithe roghnaithe sa Feach isteach liosta anuas (is féidir leat roghanna eile a roghnú de réir mar is gá duit), seiceáil an Rónna rogha sa Scrios cineál alt, agus sa Cineál mionsonraithe alt, seiceáil Sraitheanna infheicthe or Sraitheanna i bhfolach rogha de réir mar is gá duit. Agus ar deireadh cliceáil ar an OK cnaipe.
3. Ansin tagann bosca dialóige suas chun a insint duit cé mhéad sraitheanna a scriosadh, cliceáil ar an OK cnaipe.
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 i bhfolach nó infheicthe den liosta scagtha le Kutools for Excel
Uirlisí Táirgiúlachta Oifige is Fearr
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 ...
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á!
