글꼴 색만으로 Excel 텍스트에서 하위 문자열을 어떻게 캡처 할 수 있습니까?

vlookup을 사용하여 일반적인 방법으로 큰 스프레드 시트에서 선택한 셀을 캡처합니다. 그러나 내가 선택하는 텍스트는 보존해야 할 정보를 전달하는 색상이 지정된 글꼴을 사용합니다. 그러나 vlookup은 형식을 복사하지 않습니다. 나는 이러한 가능성을 본다 :

a) 형식을 유지하는 방식으로 vlookup을 사용하십시오.

b) vlookup과 함께 전송 될 컬러 텍스트 주위에 대괄호 또는 구분 기호를 넣으십시오.

나는 색상에 신경 쓰지 않고 주어진 하위 문자열이 "특별"하다는 사실을 보존해야합니다. 필요한 경우 텍스트를 Word 또는 다른 응용 프로그램으로 전송할 수 있습니다. 항상 감사합니다.

색상에 따라 다른 셀 또는 텍스트 조각을 구별 할 수있는 Excel의 유일한 기능은 VBA입니다. Excel은 텍스트 편집기가 아니거나 정교한 보고서 또는 프리젠 테이션을 위해 설계되었습니다.이 도구는 분석 도구입니다. Word 또는 Powerpoint는 프레젠테이션 도구이므로 텍스트 색상을 기준으로 선택할 수 있습니다.

구분 문자를 추가하는 두 번째 가능성은 Excel 환경에서 가장 좋은 솔루션입니다. 다른 응용 프로그램을 사용하는 것이 가장 좋습니다.

오히려 Excel이 특히 이후 버전에서 매우 많은 서식 옵션을 제공하지 않기를 바랍니다. 인간은 시각적으로 지향적이므로 컴퓨터에서 실제로 필요한 구분 기호가 명확한 형식을 계속 사용합니다.

이 기능은 다음 작업을 수행합니다.

Function GetColorText(pRange As range) As String
    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 = RGB(112, 173, 71) Then
            xOut = xOut & VBA.Mid(xValue, i, 1)
        End If
    Next
    GetColorText = xOut
End Function

원하는 색상과 일치하도록 RGB의 매개 변수를 변경해야합니다. 또한 단일 셀에 여러 개의 하위 문자열이 있으면 함께 연결됩니다.