Conas bileog a chruthú mura bhfuil sé sa leabhar oibre?
Má cheaptar, tá leabhar oibre agat ina bhfuil iliomad bileoga oibre, anois, ní mór duit a fháil amach an bhfuil ainm sonrach bileog oibre ann. Mura bhfuil ainm na bileoige oibre ann, cruthaigh é le do thoil. Má tá sé ann, tabhair teachtaireacht phras le do thoil chun a rá leat go bhfuil an bhileog ann. Conas a d’fhéadfá an tasc seo a réiteach in Excel?
Cruthaigh bileog mura bhfuil sé ann sa leabhar oibre le cód VBA
Cruthaigh bileog mura bhfuil sé ann sa leabhar oibre le cód VBA
Is féidir leis an gcód VBA seo a leanas cabhrú leat ainm bileog oibre ar leith a sheiceáil má tá sé sa leabhar oibre, mura bhfuil, féadfaidh an cód an bhileog a chruthú de réir mar is gá duit.
1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil Fuinneog.
Cód VBA: Cruthaigh bileog mura bhfuil sé ann sa leabhar oibre:
Sub TestSheetCreate()
'Updateby Extendoffice
Dim newSheetName As String
Dim checkSheetName As String
newSheetName = Application.InputBox("Input Sheet Name:", "Kutools for Excel", _
"sheet4", , , , , 2)
On Error Resume Next
checkSheetName = Worksheets(newSheetName).Name
If checkSheetName = "" Then
Worksheets.Add.Name = newSheetName
MsgBox "The sheet named ''" & newSheetName & _
"'' does not exist in this workbook but it has been created now.", _
vbInformation, "Kutools for Excel"
Else
MsgBox "The sheet named ''" & newSheetName & _
"''exist in this workbook.", vbInformation, "Kutools for Excel"
End If
End Sub
3. Agus ansin brúigh F5 eochair chun an cód seo a rith, tá bosca pras popped amach chun a mheabhrú duit ainm na bileoige a theastaíonn uait a sheiceáil, féach ar an scáileán:
4. Ansin cliceáil OK cnaipe:
(1.) Má tá an bhileog ann, popfaidh bosca pras amach le cur i gcuimhne duit mar a thaispeántar an scáileán a leanas:
(2.) Mura bhfuil an bhileog ann, cruthófar í ag an am céanna, féach an pictiúr:
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á!