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

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

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

。点滅させたいセルを選択します。

。 「フォーマット」メニューから「スタイル」を選択します。 Excelに[スタイル]ダイアログボックスが表示されます。 （図1を参照）

。 [スタイル名]ボックスに、新しいスタイル名を入力します。 （この例では、スタイル名Flashingを使用します。）

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

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

これで、ワークブックで必要な他のセルにスタイルを適用できます。次に、次のようにマクロを作成します（2つあります）。

Dim NextTime As Date

Sub StartFlash()

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

With ActiveWorkbook.Styles("Flashing").Font         If .ColorIndex = xlAutomatic Then .ColorIndex = 3         .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マクロを実行するだけです。

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

注：

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

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

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

このヒント（2134）は、Microsoft Excel 97、2000、2002、および2003に適用されます。Excel（Excel 2007以降）のリボンインターフェイス用のこのヒントのバージョンは、次の場所にあります。

linkFlashingCells。