Conas carachtar áirithe gach x carachtar a chur leis / a chur isteach i gcealla?
Ag ceapadh, tá liosta de na teaghráin téacs agam a theastaíonn uaim dashes nó aon deighilteoirí eile a chur isteach i gcealla chun an toradh scáileáin seo a leanas a fháil. Tá an iomarca cealla ag teastáil chun an carachtar áirithe a chur isteach, an bhfuil aon bhealaí gasta ann chun dashes gach ceithre charachtar a chur isteach in Excel?
Cuir carachtar áirithe gach x carachtar isteach sa chill le cód VBA
Cuir carachtar áirithe gach x carachtar i gcill le Kutools for Excel
Cuir carachtar áirithe gach x carachtar isteach sa chill le cód VBA
Féadfaidh tú an cód VBA seo a leanas a chur i bhfeidhm chun carachtar ar leith a chur isteach i gcealla, déan mar a leanas:
1. Coinnigh síos an ALT + F11 eochracha in Excel, agus osclaíonn sé an 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: Cuir carachtar áirithe gach x carachtar isteach sa chill
Sub InsertCharacter()
'Updateby Extendoffice
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
Dim xRow As Integer
Dim xChar As String
Dim index As Integer
Dim arr As Variant
Dim xValue As String
Dim outValue As String
Dim xNum As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
xRow = Application.InputBox("Number of characters :", xTitleId, Type:=1)
xChar = Application.InputBox("Specify a character :", xTitleId, Type:=2)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
xNum = 1
For Each Rng In InputRng
xValue = Rng.Value
outValue = ""
For index = 1 To VBA.Len(xValue)
If index Mod xRow = 0 And index <> VBA.Len(xValue) Then
outValue = outValue + VBA.Mid(xValue, index, 1) + xChar
Else
outValue = outValue + VBA.Mid(xValue, index, 1)
End If
Next
OutRng.Cells(xNum, 1).Value = outValue
xNum = xNum + 1
Next
End Sub
3. Ansin brúigh F5 eochair chun an cód seo a rith, agus tiocfaidh bosca pras amach le cur i gcuimhne duit an raon sonraí a theastaíonn uait carachtar áirithe a chur isteach sna teaghráin téacs a roghnú, féach an scáileán:
4. agus cliceáil OK, sa bhosca pras seo a leanas, cuir isteach an uimhir a theastaíonn uait carachtar áirithe a chur isteach gach tar éis, féach an scáileán:
5. Téigh ar cliceáil OK, agus sa bhosca pras seo a leanas, cuir isteach an carachtar áirithe a theastaíonn uait a chur leis an téacs, féach an scáileán:
6. Cliceáil OK cnaipe, agus roghnaigh cill amháin inar mian leat an toradh a aschur sa bhosca pras, féach an scáileán:
7. Faoi dheireadh, cliceáil OK, tá an carachtar áirithe curtha isteach i ngach sreangán téacs gach ceithre charachtar, féach an scáileán:
Cuir carachtar áirithe gach x carachtar i gcill le Kutools for Excel
B’fhéidir go bhfuil an cód thuas deacair go leor d’fhormhór thosaitheoirí Excel, anseo, is féidir liom uirlis áisiúil a thabhairt isteach - Kutools le haghaidh Excel, Lena Cuir Téacs gné, is féidir leat téacs nó carachtar ar leith a chur leis go tapa roimh, tar éis nó i suíomhanna áirithe den luach cille.
Kutools le haghaidh Excel : le níos mó ná 300 breiseán áisiúil Excel, saor in aisce le triail gan aon teorannú i 30 lá. |
Má tá tú suiteáilte agat Kutools le haghaidh Excel, déan mar a leanas le do thoil:
1. Roghnaigh an raon sonraí a theastaíonn uait carachtar ar leith a chur isteach.
2. Ansin cliceáil Kutools > Téacs > Cuir Téacs, féach ar an scáileán:
3. Sa an Cuir Téacs bosca dialóige, sonraigh carachtar ar mhaith leat a chur isteach sa Téacs bosca, agus ansin roghnaigh Sonraigh ón Seasamh sa bhosca téacs, cuir isteach na suíomhanna ar mhaith leat an carachtar a chur isteach iontu tar éis duit, ag an am céanna, an toradh a réamhamharc ag an bpána ceart, féach an scáileán:
Leideanna: Clóscríobhaim 4,8,12 anseo i mbosca téacs Sonraigh a thugann le fios an téacs sonrach a chur isteach i ndiaidh an 4ú, an 8ú agus an 12ú carachtar den téad téacs.
4. Ansin cliceáil Ok or Cuir iarratas isteach cnaipe, tá an carachtar sonraithe curtha isteach sna luachanna cille ag suíomhanna ar leith.
Cliceáil chun níos mó sonraí a fháil faoin bhfóntas Add Text seo.
Íoslódáil agus triail saor in aisce Kutools le haghaidh Excel Now!
Taispeántas: Cuir carachtar áirithe gach x carachtar isteach i gcill 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á!