Conas téacs a bhaint as cló cló ó chill in Excel?
Má tá liosta sonraí agat le roinnt téacs dearg i ngach cill in Excel mar a thaispeántar thíos an pictiúr, agus an bhfuil a fhios agat conas an téacs dearg a bhaint amháin? Anois tabharfaidh mé bealach gasta isteach chun an bhfreagra a bhaineann le téacs bunaithe ar dhath an chló ó chill in Excel a réiteach.
Sliocht téacs bunaithe ar dhath cló ó gach cill
Sliocht téacs bunaithe ar dhath cló ó gach cill
In Excel, ní féidir leat ach an fheidhm shainithe a úsáid chun an téacs a bhaint bunaithe ar dhath cló.
1. Brúigh Alt + F11 eochracha le chéile chun an fhuinneog Microsoft Visual Basic for Applications a oscailt.
2. cliceáil Ionsáigh > Modúil agus cóipeáil an cód VBA a leanas chuig an fhuinneog popped out.
VBA: Sliocht téacs bunaithe ar dhath an chló
Function GetColorText(pRange As Range) As String
'UpdatebyExtendoffice20220621
Dim xOut As String
Dim xValue As String
Dim i As Long
Dim TextColor
TextColor = RGB(255, 0, 0) 'colorindex RGB
xValue = pRange.Text
For i = 1 To VBA.Len(xValue)
If pRange.Characters(i, 1).Font.Color = TextColor Then
xOut = xOut & VBA.Mid(xValue, i, 1)
End If
Next
GetColorText = xOut
End Function
3. Ansin sábháil agus dún an dialóg, agus roghnaigh cill bhán in aice leis an liosta sonraí, clóscríobh an fhoirmle seo = GetColorText (A1) (Léiríonn A1 an chill ar mhaith leat téacs a bhaint aisti), brúigh Iontráil eochair chun an téacs a theastaíonn a fháil, ansin tarraing láimhseáil autofill chun an fhoirmle a líonadh go dtí an raon atá uait.
Anois feiceann tú go mbaintear gach téacs dearg.
Leid: Sa chód VBA thuas, is féidir leat an dath rgb a athrú sa script seo TextColor = RGB(255, 0, 0) do dhaoine eile chun freastal ar do riachtanas.

Díghlasáil Draíocht Excel le Kutools AI
- Forghníomhú Cliste: Oibríochtaí cille a dhéanamh, sonraí a anailísiú, agus cairteacha a chruthú - iad uile tiomáinte ag orduithe simplí.
- Foirmlí Saincheaptha: Gin foirmlí oiriúnaithe chun do shreafaí oibre a shruthlíniú.
- Códú VBA: Scríobh agus cuir i bhfeidhm cód VBA gan stró.
- Léiriú Foirmle: Foirmlí casta a thuiscint gan stró.
- Aistriúchán Téacs: Briseadh bacainní teanga laistigh de do scarbhileoga.
Earraí coibhneasta:
Uirlisí Táirgiúlachta Oifige is Fearr
Supercharge Do Scileanna Excel le Kutools for Excel, agus Éifeachtúlacht Taithí Cosúil Riamh Roimhe. Kutools for Excel Tairiscintí os cionn 300 Ardghné chun Táirgiúlacht a Mhéadú agus Am a Shábháil. Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...
Office Tab Tugann sé comhéadan Tabbed chuig Oifig, agus Déan do chuid Oibre 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á!