Conas nach féidir ach uimhreacha a ionchur sa bhosca téacs?
In Excel, is féidir linn an fheidhm Bailíochtaithe Sonraí a chur i bhfeidhm chun nach bhféadtar ach uimhreacha a iontráil i gcealla, ach, uaireanta, níl uaim ach uimhreacha a chlóscríobh i mbosca téacs chomh maith le i gcealla. Conas glacadh le huimhreacha amháin i mbosca téacs in Excel?
Roinn raon cealla le huimhir le feidhm speisialta Greamaigh
Roinn raon cealla le huimhir le feidhm speisialta Greamaigh
Is féidir leis an gcód VBA seo a leanas cabhrú leat uimhreacha, tréimhse (.) Agus comhartha diúltach a iontráil i mbosca téacs amháin, déan mar seo le do thoil:
1. Cruthaigh bosca téacs trí chliceáil Forbróir > Ionsáigh > Bosca Téacs (Rialú ActiveX), agus ansin bosca téacs a tharraingt de réir mar is gá duit, féach an pictiúr:
2. Ansin cliceáil ar dheis ar an mbosca téacs agus roghnaigh Féach an cód ón roghchlár comhthéacs chun an Microsoft Visual Basic d’Fheidhmchláir fuinneog, agus ansin cuir an cód VBA seo a leanas in ionad an chóid bhunaidh sa mhodúl bán:
Cód VBA: Lig do uimhreacha amháin a ionchur sa bhosca téacs:
Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii > Asc("9") Or KeyAscii < Asc("0") Then
If KeyAscii = Asc("-") Then
If InStr(1, Me.TextBox1.Text, "-") > 0 Or _
Me.TextBox1.SelStart > 0 Then KeyAscii = 0
ElseIf KeyAscii = Asc(".") Then
If InStr(1, Me.TextBox1.Text, ".") > 0 Then KeyAscii = 0
Else
KeyAscii = 0
End If
End If
End Sub
3. Ansin sábháil agus dún an fhuinneog cód, agus scoir an Mód Dearaidh, anois, ní féidir ach uimhreacha, siombail tréimhse agus comhartha diúltach a iontráil sa bhosca téacs, féach an scáileán:
Earraí gaolmhara:
Conas seiceáil litrithe a chur i bhfeidhm sa bhosca téacs?
Conas dath bosca téacs a athrú bunaithe ar luach in Excel?
Conas pictiúr a chur isteach sa bhosca téacs?
Conas luach réamhshocraithe a shocrú i mbosca téacs?
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á!