Conas cosc a chur ar ábhar sonrach cille a scriosadh in Excel?
Tá an t-alt seo ag caint ar chosc a chur ar ábhar sonrach cille a scriosadh in Excel. Is féidir leat é a bhaint amach leis na modhanna san alt seo.
Cosc a chur ar ábhar sonrach cille a scriosadh tríd an mbileog oibre a chosaint
Cosc a chur ar ábhar sonrach cille a scriosadh trí chód VBA a úsáid
Cosc a chur ar ábhar sonrach cille a scriosadh tríd an mbileog oibre a chosaint
De réir réamhshocraithe, tá gach cealla sa bhileog oibre faoi ghlas. Más mian leat ábhar sonrach cille a chosc ó scriosadh, agus cealla eile a chur in eagar tar éis iad a chosaint, déan mar a leanas le do thoil.
1. Cliceáil ar an cnaipe ar an gcúinne ar chlé barr na bileoige oibre chun an bhileog oibre iomlán a roghnú. Ansin brúigh Ctrl + 1 eochracha a oscailt Cealla Formáid dialóg.
2. Sa popping suas Cealla Formáid bosca dialóige, díthiceáil an Faoi Ghlas rogha faoin Cosaint tab, agus ansin cliceáil ar an OK cnaipe. Féach an pictiúr:
3. Roghnaigh na cealla nach dteastaíonn uait an t-ábhar a scriosadh, brúigh Ctrl + 1 eochracha chun an Cealla Formáid bosca dialóige arís, seiceáil an Faoi Ghlas rogha faoin Cosaint tab, agus ansin cliceáil ar an OK cnaipe.
4. Anois cliceáil Athbhreithniú > Bileog Cosanta, ansin sonraigh agus deimhnigh do phasfhocal sa dá Bileog Cosanta agus Deimhnigh do Phasfhocal boscaí dialóige.
Anois tá an bhileog oibre cosanta. Agus ní scriosfar an t-ábhar cille sonraithe níos mó.
Cosc a chur ar ábhar sonrach cille a scriosadh trí chód VBA a úsáid
Chomh maith leis an dá mhodh thuas, is féidir leat cód VBA a rith chun cosc a chur ar ábhar sonrach cille a scriosadh i mbileog oibre. Déan mar a leanas le do thoil.
1. Oscail an bhileog oibre ina bhfuil an t-ábhar cille nár mhaith leat a scriosadh, cliceáil ar dheis ar an mBileog Cluaisín, agus ansin cliceáil Féach an cód ón roghchlár cliceáil ar dheis.
2. Cóipeáil agus greamaigh an cód VBA thíos i bhfuinneog Chód an Microsoft Visual Basic d’Fheidhmchláir fhuinneog.
Cód VBA: Cosc a chur ar ábhar sonrach cille a scriosadh in Excel
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:E7")) Is Nothing Then Exit Sub
On Error GoTo ExitPoint
Application.EnableEvents = False
If Not IsDate(Target(1)) Then
Application.Undo
MsgBox " You can't delete cell contents from this range " _
, vbCritical, "Kutools for Excel"
End If
ExitPoint:
Application.EnableEvents = True
End Sub
nótaí: Sa chód, is é A1: E17 an raon a choiscfidh tú an t-ábhar cille a scriosadh. Féadfaidh tú an raon a athrú bunaithe ar do chuid riachtanas.
As seo amach, nuair a bheidh tú ag iarraidh ábhar cille a scriosadh ó raon A1: E17, gheobhaidh tú a Kutools le haghaidh Excel bosca dialóige mar a thaispeántar thíos an scáileán, cliceáil ar an OK cnaipe.
Earraí gaolmhara:
- Conas bileog oibre áirithe a chosc ó scriosadh in Excel?
- Conas cosc a chur ar roghnú iliomad bileoga oibre 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á!