특정 구문으로 행을 강조 표시하려면 어떻게합니까?

-1

제가 일하는 곳은 월별 숫자가 Excel 스프레드 시트에 나열되어 있습니다. 매월 동료는 문구가 Jacobs Eng QP 인 모든 행을 찾아 행을 수동으로 강조 표시해야합니다. 이걸 할 수있는 매크로가 있습니까?특정 구문으로 행을 강조 표시하려면 어떻게합니까?

출처

2013-09-24 grannd

'* * * * Jacobs Eng QP'또는 'Jacobs Eng QP'등을 다루고 싶습니까? – pnuts

선택 범위

리본에 Conditional Formatting을 클릭하십시오.

다음에 Equal to이고 Jacobs Eng QP 입력란에 입력하십시오.

enter image description here

VBA의 사용자 친화적 인 솔루션

Option Explicit 

Sub HighlightCells() 

    Dim rangeToCheck As Range 
    Set rangeToCheck = Application.InputBox(Prompt:="Please Select Range", Title:="Range Select", Type:=8) 

    Dim searchTerm As String 
    searchTerm = InputBox("Enter search term") 

    Dim cell As Range 
    For Each cell In rangeToCheck 
     If InStr(1, cell, searchTerm, vbTextCompare) Then cell.Interior.Color = RGB(255, 0, 0) 
    Next 

End Sub

추가 자원

enter image description here