1行または１列おきに色で塗りつぶして分かりやすくしているファイルもありますが
行・列数が多ければ多いほど、「今どの行を入力しているんだっけ？」という
場面が大いにあります。

そこで今回は選択しているセル・行・列を自動で色付けすることで
どこの項目や番号に入力しているか分かりやすくしてみたいと思います。

条件付き書式とマクロVBAを使用しますが
実際の画面を用いて説明しますので是非参考にしてみてください。

それでは見ていきましょう。

⬛︎こんな事ができるようになる！

選択しているセル・行・列に自動的に塗りつぶしで色がつくことで
選択中の範囲が一目でわかるようになる。

⬛︎必要な知識

・条件付き書式設定

【条件付き書式】必見！使用方法や設定方法を詳しく説明～ルールの追加・編集・削除・優先順位～ ► 独学エクセル塾 (dokugakuexcel.com)
・マクロVBA設定

【マクロVBA】プログラム・ソースコードを入力するためのモジュール作成・削除・名前の変更について ► 独学エクセル塾 (dokugakuexcel.com)

⬛︎選択しているセル・行・列に色をつける

①条件付き書式の設定

まず初めに条件付き書式を設定する必要があります。
見本で下図の表を用意しました。

今回は見本で選択した行の色が変わるようにしたいと思います。
まず、表を範囲選択します。

そしてメニューの「ホーム」から「条件付き書式」を選択します。

メニューの中に「新しいルール」という項目があるのでこちらを選択します。

まずは、ルールの種類を選択するのですがここでは「数式を使用して、書式設定するセルを決定」にします。

次に「次の数式を満たす場合に値を書式設定」に数式を入れるのですが
例では選択した行に色をつけるので「=Cell(“Row”)=Row()」とします。

意味として「Cell(“Row”)」は現在選択しているセルになります。
つまり、5行目を選択していれば「Cell(“Row”)」は「5」になります。

「Row()」の部分は単純でセルの行数を指します。
つまり、7行目の書式の「Row()」は「7」のように、
そのセルの行数を出力します。

つまり「Cell(“Row”)=Row()」とする事で
選択した行に対して対象の行がイコールになれば、設定した書式になります。

次に書式の設定です。
メニューから「書式」を選択すると以下のようなメニューが表示されます。

そこから「塗りつぶし」タブを選択して色を選択します。
ちなみに今回は「塗りつぶし」ですが文字の色を変えたい場合は「フォント」のタブから
色を選択すれば可能になります。

今回は黄色にしてみました。
これで対象の表のセルを選択すると、選択した行数に合わせてその行が「黄色」になります。

では動作確認してみましょう。
「9行目」を選択して、「数式」タブから「再計算実行」をしてみたいと思います。

結果はこのようになります。

「9行目」が黄色に変わりました。

今回は行に色を付けましたが列やセル、または行と列などの条件も見本で用意しました。

列:Cell(“COL”)=Column()

行と列：OR(Cell(“Row”)=Row(),Cell(“COL”)=Column())

セル：AND(Cell(“Row”)=Row(),Cell(“COL”)=Column())

しかし、ここまで出来たものの「再計算」をしないと色が変わらないのは不便ですよね。
この現象の理由としては「条件付き書式」は再計算をしたタイミングで反映されるので、
「再計算」をさせるか、「セルをダブルクリックして編集した後にEnterで確定（計算方法の設定が自動に限る）」になります。

この問題を解決するためにマクロVBAで再計算を自動で行うプログラムを組んでいきます。

②マクロVBAで自動的に再計算を実行する

では自動的に再計算を実施する方法について説明します。
まず、visual basicの画面を開きましょう。

visual basicの画面の出し方についてはこちらから☟

【マクロVBA】プログラム・ソースコードを入力するためのモジュール作成・削除・名前の変更について ► 独学エクセル塾 (dokugakuexcel.com)

そして対象のシートを選択します。
ここでは「見本シート」になります。

こちらにコードを書き込むのですが先に書き込むコードを紹介します。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Calculate
End sub

VBAのコードを知らない方、知らなくても良いという方は
すでに機能していると思うので試してみてください。

ではコードの説明をしていきます。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
の意味は「セルの選択が変更された時に実行する」という機能を持ちます。

つまり、マウスで別のセルを選択したり、矢印キーで
セルの選択の移動をした際にプロシージャ（プログラム）が実行されます。

その下に「calculate」がありますが
これは「計算の実行」を指します。つまり、再計算をしてくれるコードです。

では先程のシートに戻りましょう。

セルをクリックまたはし矢印キーで表を動かした結果はこちらです。

セルの選択に合わせて対象行が塗りつぶされて、
現在選んでいる行がわかりやすくなりました。

⬛︎応用:セルを動かすたびに動きが遅くなる原因

今回の機能を追加して、動作が遅くなった場合は
ファイル自体に多くの関数を使っているのかもしれません。

セルの選択を変えると表以外の関数も再計算が実行されます。

つまり関数を大量に使用していれば、その都度計算を実行するので処理に時間がかかるメカニズムです。

そこで対処法として、「指定範囲内のセルの選択のみ計算を実行する」ことで、

不要な再計算をなくす事ができます。

ではコードを紹介します。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row >= 3 And Target.Row <= 13 And Target.Column >= 2 And Target.Column <= 7 Then
Calculate
End If
End Sub

仕組みとして、選択したセルの情報は「target」に格納されます。
そこから選択したセルの行数と列数を検出し、対象範囲だった場合に再計算をさせるコードになっています。

見本では行数は「3から13」、列数は「2から7」で再計算を実行します。

これにより、表以外を選択しても不要な再計算をしなくてもいいので
余分なロスがなくなります。

⬛︎公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが

マイクロソフト公式の説明については下記のリンクを参照してください。☟

Worksheet.Calculate メソッド (Excel) | Microsoft Learn

Worksheet.SelectionChange イベント (Excel) | Microsoft Learn

⬛︎まとめ

いかがだったでしょうか。
今回の内容を応用すると表の入力箇所が、どの項目に打ち込んでいるのか分かりやすくなるので
とても便利になります。

VBAを触った事がない方は
少し、難しい内容ですがこれを機にVBAを学ぶのも良いかもしれません。

それでは次回の記事でお会いしましょう。

特にリストによる入力の制限はよく使用されていますよね。

エラーを防止する上でも役立つので、ぜひ参考にしてみてください。

それでは見ていきましょう。

■入力規則の設定画面

まずは設定する前に設定画面の開き方についてです。
設定画面は「データ」から「データの入力規則」を押せば
設定画面が現れます。

ここで設定から入力時のメッセージ・エラーメッセージなどを設定することができます。

■入力規則を実行してみる

では実際に入力規則を実行してみましょう。
入力値の種類を順に紹介したいと思います。

・すべての値

こちらは通常のセルの状態と変わりません。
制限がなく、どんな文字・数値でも入力することができます。
制限の解除などにも使用できそうですね。

・整数

こちらは整数のみの入力制限になります。
なので小数点や文字を入力するとエラーになります。

さらに最小値・最大値が設定できる上に
データの項目では以上や以下、等しいといった詳細の設定も可能です。

上記の見本では「1～10」までの入力が可能になります。

・小数点数

こちらは整数の入力規則に加え小数点も入力可能になる項目です。

なので金額等、小数点を嫌う場合は「整数」
計算等で小数点が必要な場合は「小数点数」で差別化してみてください。

・リスト

こちらのリストが一番使用されるのではないでしょうか。
機能としては入力規則がリストで表示されます。

下記の見本を参考に見ていきましょう。

「朝食は食べましたか？」の問いに「はい・いいえ」で選択できるようにしましょう。
リストは「元の値」に打ち込みますが選択肢の間に「,」を挟みましょう。
「はい・いいえ」では「はい,いいえ」を元の値に打ち込みます。

結果は…

このように「はい・いいえ」から選択できるようになりました。
さらにこのリストはセルの参照をすることができます。

さらに見本を作成してみました。

リストの選択肢は項目の「1から６年生」を参考にしてみましょう

このように項目の範囲を元の値に打ち込むと…

リストの入力が項目に合わせて選べるようになりました。
参照からリストを作成すると、参照元が変わってもリストも追従して変わるので
項目が随時変化するものには便利ですね。

・日付

こちらは日付の入力のみ限定されます。
さらに「次の日付から」と「次の日付まで」を入力し
日付の入力範囲を狭めることができます。

・時刻

こちらは時刻のみが入力できるようになります。
こちらも日付のように
さらに「次の時刻から」と「次の時刻まで」を入力し範囲を狭めることが可能です。

・文字列(長さ指定)

こちらは文字の数を制限するものです。
「最小値」と「最大値」を設定することで文字の数を制限できます。

上記見本で言うと「文字数5～10」以外はエラーになり入力ができなくなります

・ユーザー設定

ここでは個人的に式を入力したりすることで
独自の入力規則を行います。

今回は内容が複雑になるため、説明は省略したいと思います。

■入力時のメッセージ

こちらは入力規制をかけたセルを選択するとコメントのように
メッセージが表示される機能です。

入力時、どのように入力してほしいかガイドのような機能を果たすことができます。
見本で先ほどの朝食を食べたか確認するファイルを元に説明します。

では一例でこのようなメッセージを表示したいと思います。

この設定で入力規則をしているセルを選択すると…

このように入力時に設定したメッセージが表示されるようになります。

上部にある「セルの選択時にメッセージを表示する」のチェックを外すと

メッセージは表示されなくなります。

■エラーメッセージ

こちらの機能は入力規制外の入力をした際の表示やメッセージを選択できます。
下記の年齢の入力画面をもとに説明したいと思います。

さらに入力規則は「整数」で「0～150」までとします。

ここで仮に「200」などの規則範囲外の入力をすると
下記のような異常画面が表示されます。

今回はこのエラーメッセージをカスタムしてみましょう。
下記のようなタイトルとエラーメッセージを設定してみました。

再度、規則外の数値を打ち込んでみましょう。
結果はこのようになります。

設定した通りのメッセージが表示されました。

さらにスタイルが「停止」「注意」「情報」があるのでそれぞれ見ていきましょう。

・停止

先ほど見本で説明したのが「停止」になります。

この停止では規則外だった場合、いかなる場合でも入力は不可になります。

・注意

先ほどの停止と比べ、再試行が消えて「はい」と「いいえ」が追加されました。

この画面で「はい」を選択すると規則範囲外でも入力が完了します。
対して「いいえ」を選択すると入力が中断されます。

・情報

こちらはメッセージは表示されるものの
確認のみで、どのような数値でも入力される仕組みです。

・規則外でもメッセージ画面を表示しない

設定画面の上部に「無効なデータが入力されたらエラーメッセージを表示する」
という項目があります。

こちらのチェックを外すと規則外でもメッセージ画面が表示されず

入力されるようになります。

■日本語入力

こちらはあまり使用する機会はないと思います。
項目では「ひらがな」や「全角英数字」等があります。

仮に「全角英数字」を選択すると
「A」をおしても「あ」の入力ができなくなります。

なので「ひらがな」を選択すると「ひらがな」のみしか入力できません。

■まとめ

いかがだったでしょうか。
リスト入力など、とても便利ですよね。

リストで選択した項目をさらに次のリストで内容を絞り、

表示する方法についてもまとめていますのでぜひ参考にしてみてください。

記事についてはこちら☟

【プルダウンからプルダウン?】選択したプルダウンリストに連動して選択肢を絞り込んだプルダウンを表示 ► 独学エクセル塾 (dokugakuexcel.com)

では次回の記事でお会いしましょう。