3時間の検索の後、私はまだ答えを見つけられませんでした.これが私がやろうとしていることです:
私は、WBS が含まれる行を緑で、ACT が含まれる行を赤で、EPR が含まれる行を青で埋めようとしています。最初の式で機能し、2番目の式を追加しようとすると、すべてが台無しになります。
3時間の検索の後、私はまだ答えを見つけられませんでした.これが私がやろうとしていることです:
私は、WBS が含まれる行を緑で、ACT が含まれる行を赤で、EPR が含まれる行を青で埋めようとしています。最初の式で機能し、2番目の式を追加しようとすると、すべてが台無しになります。
私が理解しているのは、行内のキーワードを検索する必要があり、その行のセルに見つかった場合は色を付けるということです。
条件付き書式でできるかもしれませんが、別のアイデアがあります。Excel VBA で簡単な検索機能を作成できます。このようなもの:
=search_row(A1:F1,"EPR")
指定された行のいずれかのセルに EPR が見つかった場合、関数は 1 を返します。ここで、データ列の最後に 2 つの異なる列を作成する場合、最初に WPS で名前を付け、2 番目に EPR で名前を付けて、この関数をその中に記述します。お気に入り
G1 =search_row(A1:F1,"WPS")
H1 =search_row(A1:F1,"EPR")
ドラッグして終了します。次に、列を並べ替えます。まずは上位から下位へのWPS。次に、単一の選択で 1 を持つすべての行に色を付けます。同様に、EPR (H1) 列でも同じことを行います。
この機能を使用するには、次の URL からマクロ ファイルをダウンロードします。
http://asimishaq.com/myfiles/SearchHighlight.xlsm
これを実行するには、まずマクロを有効にしてから、データ ファイルを再度開いてから、このマクロ ファイルを開きます。このマクロ ファイルが開いている限り、この機能を使用できます。マクロを自分で作成する場合の VBA コードは次のとおりです。
Function search_row(sRow As Range, Keyword As String)
Dim i As Integer
Dim Found As Integer
For i = 1 To sRow.Columns.Count
If InStr(1, LCase(sRow.Cells(1, i)), LCase(Keyword)) > 0 Then
search_row = 1
End If
Next
End Function