Conas bileoga folmha a bhaint as leabhar oibre
Má cheaptar go bhfuil leabhar mór oibre agat le bileoga iolracha, ach tá roinnt bileoga folmha ann gan aon ábhar sa leabhar oibre seo. Chun an leabhar oibre a dhéanamh níos gairmiúla agus níos foirmiúla, ba mhaith leat na bileoga bána seo a bhaint den leabhar oibre. In áit na bileoga folmha a bhaint ceann ar cheann, tugaim isteach na modhanna chun gach bileog bhán a bhaint go tapa.
Bain bileoga bán le Kutools le haghaidh Excel
Bain bileoga bána le VBA
Seo a thugann mé VBA isteach chun cabhrú leat gach bileog bhán a bhaint go tapa as leabhar oibre oscailte.
1. Brúigh Alt + F11 eochracha le cumasú Microsoft Visual d’Fheidhmchláir Bhunúsacha fhuinneog.
2. Agus cliceáil Ionsáigh > Modúil, greamaigh faoi bhun chód VBA leis an popped nua Modúil fhuinneog.
VBA: Bain bileoga folmha.
Sub DeletEmptySheets()
'UpdatebyKutoolsforExcel20151130
Dim xWs As Worksheet
Dim xAlert As Boolean
Dim xCount As Long
xAlert = Application.DisplayAlerts
Application.DisplayAlerts = False
If MsgBox("Are you sure to remove all empty sheets?", vbYesNo, "Kutools for Excel") = vbNo Then Exit Sub
For Each xWs In ActiveWorkbook.Worksheets
If (Application.CountA(xWs.Cells) = 0) And _
(xWs.Shapes.Count = 0) Then
xWs.Delete
xCount = xCount + 1
End If
Next
MsgBox "You have removed " & xCount & " empty sheet(s)", , "Kutools for Excel"
Application.DisplayAlerts = xAlert
End Sub
3. Agus brúigh F5 eochair nó Rith cnaipe chun an VBA a fhorghníomhú, agus tagann dialóg amach le cur i gcuimhne duit ar cheart bileoga folmha a bhaint, cliceáil Is ea dul ar bhaint, Uimh chun an VBA seo a chealú.
4. Tar éis cliceáil Is ea, tagann dialóg amach chun líon na mbileog a baineadh a insint duit, cliceáil OK chun é a dhúnadh, agus baineadh na bileoga folmha uile ag an nóiméad seo.
Bain bileoga bán le Kutools le haghaidh Excel
I gcás roinnt lámha glasa Excel, is modh sách deacair é an VBA a fhorghníomhú, ach le Kutools le haghaidh Excel'S Scrios Bileoga Oibre Blank feidhm, is féidir leat gach bileog folamh a bhaint go tapa as leabhar oibre le trí chliceáil luch!
Kutools le haghaidh Excel, le níos mó ná 300 feidhmeanna úsáideacha, déanann sé do phoist níos éasca. |
Tar éis suiteáil saor in aisce Kutools for Excel, déan mar atá thíos le do thoil:
1. Cumasaigh an leabhar oibre a theastaíonn uait a bhileoga folmha a bhaint, agus cliceáil Kutools Plus > Bileog Oibre > Scrios Bileoga Oibre Blank. Féach an pictiúr:
Ailt Choibhneasta:
- Conas dúbailtí a chomhaireamh agus a bhaint de liosta in Excel?
- Conas sreang a scriosadh i ndiaidh an naoú carachtar in Excel?
- Conas téacs a bhaint idir lúibíní / lúibíní in Excel?
- Conas cruthanna líne a bhaint in 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á!