Conas gach bileog a scriosadh seachas ceann sonraithe / reatha in Excel?
Chun gach bileog a scriosadh i leabhar oibre Excel seachas bileog ghníomhach shonraithe amháin nó reatha, is féidir leat déileáil leis seo mar atá thíos na modhanna a thaispeántar.
Scrios gach bileog seachas ceann sonraithe le cód VBA
Cliceáil amháin chun na bileoga go léir a scriosadh seachas ceann gníomhach reatha le Kutools for Excel
Scrios gach bileog seachas ceann sonraithe le cód VBA
Le cód VBA faoi bhun, is féidir leat gach bileog a scriosadh i leabhar oibre seachas ceann sonrach in Excel.
1. Brúigh Eile + F11 eochracha ag an am céanna chun an Feidhmchlár Bunúsach Amharc Microsoft fhuinneog.
2. cliceáil Ionsáigh > Modúil, ansin cóipeáil agus greamaigh faoi bhun chód VBA isteach i bhfuinneog an Mhodúil.
Cód VBA: Scrios gach bileog seachas cinn shonraithe
Sub DeleteSheets1()
Dim xWs As Worksheet
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each xWs In Application.ActiveWorkbook.Worksheets
If xWs.Name <> "Sheet1" And xWs.Name <> "Sheet2" Then
xWs.Delete
End If
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Subnótaí:
1. "Sheet1"Agus"Sheet2Is bileoga iad seo ba mhaith leat a choinneáil sa leabhar oibre reatha. Is féidir leat iad a athrú bunaithe ar do chuid riachtanas.
2. Más mian leat gach bileog a scriosadh ach níos mó bileoga a choinneáil, cuir an cód le do thoil Agus xWs.Name <> "d’ainm bileog" roimh an Ansin focal sa séú líne den chód. Mar:
Más xWs.Name <> "Bileog1" Agus xWs.Name <> "Bileog2" Agus xWs.Name <> "ainm do bhileog" Ansin
3. Mura dteastaíonn uait ach bileog amháin a choinneáil agus gach ceann a scriosadh ón leabhar oibre, bain gach ceann díobh le do thoil agus riocht sa chód. Mar shampla, chun bileog1 a choinneáil sa leabhar oibre reatha, ní mór duit an séú cód líne a athrú go: Más xWs.Name <> "Bileog1" Ansin
Scrios gach bileog seachas an ceann gníomhach reatha le Kutools for Excel (Cliceáil amháin)
YIs féidir le ou gach bileog a bhaint go héasca seachas an bhileog ghníomhach reatha gan ach cliceáil amháin a dhéanamh Scrios Gach Bileog Neamhghníomhach 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. cliceáil Kutools Plus > Bileog Oibre > Scrios Gach Bileog Neamhghníomhach.
3. Ansin tagann bosca dialóige aníos, má shocraíonn tú gach bileog a scriosadh seachas ceann gníomhach, cliceáil an OK cnaipe, ar shlí eile, cliceáil ar an Cealaigh cnaipe.
Ansin scriostar gach bileog seachas an ceann gníomhach reatha i do leabhar oibre.
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.
Cuir téacs i lár na gcealla roghnaithe le Kutools le haghaidh 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á!
