Conas téacs faoi leith a aimsiú agus a athsholáthar i mboscaí téacs?
Is uirlis úsáideach é Aimsigh agus Ionadaigh dúinn chun ábhar nó foirmlí cille a aimsiú agus a athsholáthar go tapa agus go caothúil i mbileog oibre. Ach anois, tá iliomad boscaí téacs agam i mo bhileog oibre, agus ba mhaith liom an téacs sonrach a aimsiú agus luach eile a chur ina áit sna boscaí téacs seo amháin. An bhfuil aon bhealaí maithe agat chun déileáil leis an bhfadhb seo?
Faigh agus cuir téacs ar leith in ilbhoscaí téacs
Faigh agus cuir téacs ar leith in ilbhoscaí téacs
Is féidir leat an téacs a theastaíonn uait a fháil de láimh ceann ar cheann, agus a athsholáthar, ach má tá iliomad boscaí téacs ann, beidh sé seo leadránach agus tuirseach. Mar sin is féidir leis an gcód VBA seo a leanas cabhrú leat é a chríochnú ag an am céanna.
1. Gníomhachtaigh do bhileog oibre, agus coinnigh síos an ALT + F11 eochracha a oscailt Fuinneog Microsoft Visual Basic for Applications.
2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Fuinneog an Mhodúil.
Cód VBA: Faigh agus cuir téacs ar leith i mboscaí téacs den bhileog oibre reatha
Sub TextBoxReplace()
'Updateby20140603
Dim xWs As Worksheet
Dim shp As Shape
Dim xFindStr As String
Dim xReplace As String
xFindStr = Application.InputBox("Find:", xTitleId, "", Type:=2)
xReplace = Application.InputBox("Replace with:", xTitleId, "", Type:=2)
Set xWs = Application.ActiveSheet
On Error Resume Next
For Each shp In xWs.Shapes
xValue = shp.TextFrame.Characters.Text
shp.TextFrame.Characters.Text = VBA.Replace(xValue, xFindStr, xReplace, 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 dul isteach i do shean-théacs a theastaíonn uait a athsholáthar. Féach an pictiúr:
4. Téigh ar cliceáil OK, agus sa bhosca pras seo, clóscríobh an luach téacs nua atá uait, féach an scáileán:
5. Agus ansin cliceáil OK cnaipe, tá na luachanna nua a chuir tú isteach sa bhileog oibre reatha curtha in ionad na seanluachanna. Féach screenshots:
 |
 |
 |
Earraí gaolmhara:
Conas téacs a aimsiú agus a athsholáthar i dteidil cairte in Excel?
Conas téacs a aimsiú agus a athsholáthar laistigh de thráchtanna in Excel?
Conas ilbhealaí hipearnasc a athrú ag an am céanna 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á!
