Kuidas Excelli elemendist pärit teksti värvide põhjal välja võtta?

Kui teil on mõnes Excelis igas lahtris mõne punase tekstiga andmeloend, nagu näidatud allpool pildil, ja kas teate, kuidas ainult punast teksti välja võtta? Nüüd tutvustan kiiret lahendust, mis lahendab puzzle, mis ekstraktib Exceli elemendist pärineva fondi värvi põhjal teksti.

Väljavõtte tegemine iga lahtri fondi värvi põhjal

Väljavõtte tegemine iga lahtri fondi värvi põhjal

Amazing! Tõhusate vahekaartide kasutamine Excelis nagu Chrome, Firefox ja Safari!

Excelis saate teksti väljavõtteid kasutada ainult fontide värvina kasutades määratletud funktsiooni.

1. press Alt + F11 võtmed koos Microsoft Visual Basic for Applications akna avamiseks.

2. klõps Sisesta > moodulid ja kopeerige aktiveeritud aknale järgmine VBA kood.

VBA: teksti väljavõte fontide värvi põhjal

Function GetColorText(pRange As Range) As String
	'Updateby20141105
	Dim xOut As String
	Dim xValue As String
	Dim i As Long
	xValue = pRange.Text

	For i = 1 To VBA.Len(xValue)

		If pRange.Characters(i, 1).Font.Color = vbRed Then
			xOut = xOut & VBA.Mid(xValue, i, 1)
		End If

	Next

	GetColorText = xOut
End Function

3. Seejärel salvestage ja sulgege dialoog ja valige andmeloendi kõrval tühi lahtris tüüp seda valemit = GetColorText (A1) (A1 näitab lahtrit, kuhu soovite teksti välja võtta), vajutage sisenema et saada vajalik tekst, seejärel lohistage automaatse täitmise käepide, et täita valem soovitud vahemikku.

Nüüd näete kogu punast teksti väljavõtte tegemisel.

tüüp: Ülaltoodud VBA-koodis, kui peate musta teksti välja võtma rakkudest, saate muuta värvi nime Värv = vbRed et Värv = vbBlack.

Suhtelised artiklid:

• Väljastage paksus kirjas ainult Excelis

• Ekstraktsioonis kümnendväärtuste väljavõtmine

• Välja otsida Exceli vidina nimi

Soovitatavad tööriistad

Office'i vahekaart

Tooge kasulikke kaarte Exceli ja muudele Office'i tarkvaradele, nagu Chrome, Firefox ja uus Internet Explorer.

Kutools Exceli jaoks