-1

私が働いている場所では、Excel スプレッドシートに月次の数字が記載されています。毎月、同僚はそのフレーズを含むすべての行を見つけて、Jacobs Eng QPその行を手動で強調表示する必要があります。私のためにこれを行うことができるマクロはありますか?

4

3 に答える 3

5

範囲を選択

Conditional Formattingリボンをクリックします。

次にEqual to、入力ボックスにJacobs Eng QPと入力します。

ここに画像の説明を入力

ここに画像の説明を入力


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

追加リソース:

于 2013-09-24T14:29:00.950 に答える