多くの人は、Excelの条件付き書式機能を使用して、ワークシートの特定の値または領域に注意を向けます。たとえば、セルは、特定のしきい値を上回ったり下回ったりした場合に、その内容が赤または太字で表示されるようにフォーマットされている場合があります。

ただし、不足しているのは、セルの内容を点滅させたり、点滅させたりする方法です。そのような偉業のために、あなたはあなた自身の装置とマクロの奇跡に任せられます。これらのツールを利用すると、最初に点滅するセルの特別なスタイルを設計し、次に単純なマクロを実行することで、セルを点滅させることができます。

特別なスタイルを作成するには、次の手順に従います。

。点滅させたいセルを選択します。 （セルに何かが含まれていることを確認してください。空白にしないでください。）

。 [ホーム]タブがリボンに表示されていることを確認します。

。 [スタイル]グループで、[セルスタイル]をクリックします。 Excelは、事前定義されたスタイルの選択を表示します。

。新しいセルスタイルを選択します。 Excelに[スタイル]ダイアログボックスが表示されます。 （図1を参照）

。 [スタイル名]ボックスに「点滅」という名前を入力します（引用符は含みません）。

。ダイアログボックスのコントロールを使用して、必要に応じてスタイルの属性を変更します。

。 [OK]をクリックします。

これでスタイルが定義されたので、「フラッシュ」するセルにそのスタイルを適用する必要があります。スタイルを他のセルに適用しないようにしてください。

次に、次のようにマクロを作成します（2つあります）。

Dim NextTime As Date

Sub StartFlash()

NextTime = Now + TimeValue("00:00:01")

With ActiveWorkbook.Styles("Flashing").Font         If .ColorIndex <> 2 And .ColorIndex <> 3 Then             .ColorIndex = 3         End If         .ColorIndex = 5 - .ColorIndex     End With     Application.OnTime NextTime, "StartFlash"

End Sub
Sub StopFlash()

Application.OnTime NextTime, "StartFlash", schedule:=False     ActiveWorkbook.Styles("Flashing").Font.ColorIndex = xlAutomatic End Sub

アイテムの点滅を開始するには、StartFlashを実行するだけです。点滅スタイルでフォーマットされたセルは、約1秒に1回、赤と白のテキストを交互に表示します。フラッシュをオフにしたい場合は、StopFlashマクロを実行するだけです。

マクロは、このヒントの前半で以前に定義したスタイルを変更することによって機能します。 （手順5に示すように、スタイルに「点滅」という名前を付けるようにしてください。

）ColorIndexプロパティを変更して、2つの値（3と2）を切り替えるだけです。スタイルの変更テキストの色が赤（3）から白（2）に変わり、また元に戻ると、点滅効果が得られます。

このマクロについて注意すべきもう1つの重要な点があります。それは、変数NextTimeが、それが使用される実際のプロシージャの_outside_で宣言されていることです。これは、NextTimeがStartFlashの呼び出しから次の呼び出しまでその値を維持するために行われます。次回（1秒後）にStartFlashを再実行するように指定するために使用されるのは、この値です。

注：

このページ（または_ExcelTips_サイトの他のページ）で説明されているマクロの使用方法を知りたい場合は、役立つ情報を含む特別なページを用意しました。

linkここをクリックして、新しいブラウザタブでその特別なページを開きます。

_ExcelTips_は、費用効果の高いMicrosoftExcelトレーニングのソースです。

このヒント（7223）は、Microsoft Excel 2007、2010、2013、2016、2019、およびOffice 365のExcelに適用されます。Excelの古いメニューインターフェイス用のこのヒントのバージョンは、次の場所にあります。

linkFlashingCells。