リンクユニット

Windows7 & Office2010 Excel2010

アクティブセルの行に色を付ける

投稿日:2017年2月7日 更新日:

Excelで横に長い表を操作する場合、[ウィンドウ枠の固定]を使って列を固定して見やすくすることもできますが、それでも似たような数字が並んでいると見間違えやすいですね。
アクティブセルのある行に色を付けて見やすくできないかなと検索すると、たくさんヒットしました。
その中でも一番分かりやすく設定しやすいと思ったのが、下のページで解説されているものでした。
このページで解説されているとおりに設定して、とても便利になりました。(人-)謝謝 !
アクティブセルのある行・列を目立たせる:Excel エクセルの使い方-イベントプロシージャ/VBA

条件付き書式の設定

今回、この設定方法を図説して記録しておきます。
まず、条件付き書式の設定をします。設定したい範囲を選択します。
参考巨大な表の場合、表内の任意のセルを選択して、キーボードから[Ctrl]+[*](テンキー)を押すと便利です。テンキーがない場合は、[Ctrl]+[Shift]+[*]です。アクティブセル領域を選択するショートカットキーです。

[ホーム]タブの[スタイル]グループにある[条件付き書式]をクリックして、[新しいルール]をクリックします。
新しいルール

[新しい書式ルール]ダイアログボックスが表示されたら、[数式を使用して、書式設定するセルを決定]を選択して、[次の数式を満たす場合に値を書式設定]のテキストボックスに以下のように入力します。

=CELL("ROW")=ROW()

[書式]ボタンをクリックして、[塗りつぶし]タブから任意の色を選択します。[OK]ボタンをクリックして閉じます。
新しい書式ルール

CELL関数について

CELL関数は、セルの書式、位置、または内容に関する情報を返します。
CELL(検査の種類,[対象範囲])

引数"ROW"は、対象範囲の左上隅にあるセルの行番号を返します。

CELL 関数 - Office サポート

ROW関数について

ROW関数は、引数として指定された配列の行番号を返します。
ROW([範囲])

範囲を省略すると、ROW関数が入力されている行番号を返します。

ROW 関数 - Office サポート

以下の記事では、ROW関数を使って、途中の行を削除しても常に連番を表示する方法を解説しています。

行番号を使って連番を表示

Excelで下の表のようにA列に[NO]フィールドがあって、1から連番が並んでいる表があります。 現状(関数未入力) この表で4行目と9行目 ...

続きを見る

VBEを起動してコード貼り付け

[開発]タブを表示している場合は、[開発]タブから[Visual Basic]をクリックします。
開発タブ

[開発]タブを表示していない場合は、開発タブの表示を参照して[開発]タブを表示させるか、または以下の方法でVBEを起動させてください。

シート見出しで右クリックします。メニューの中から[コードの表示]をクリックします。[開発]タブを表示している場合でも、同じ操作で表示させることができます。(下の画像はExcel2016ですが、他のバージョンでも操作できます。)
シート見出し

VBEの左側にある[ThisWorkbook]をダブルクリックします。
以下のコードを貼り付けます。

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Application.ScreenUpdating = true
End Sub

VBEウィンドウは右上の[閉じる]ボタンで閉じます。
VBE

これで、アクティブセルの行が色付きになります。
アクティブセルの行

指定したシートのみで動作させたい時

[ThisWorkbook]にコードを記述すると、ブック内で上記の条件付き書式を設定したすべてのシートで有効になります。もし、それを避けたいのであれば、指定のシートのイベントプロシージャ[Worksheet_SelectionChange]に下のコードを貼り付けてください。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.ScreenUpdating = True
End Sub

以下は、[Sheet1]のみに動作させたい場合ですね。
VBE

保存するときは、[Excelマクロ有効ブック]として保存してください。拡張子は[.xlsm]となります。

参考[名前を付けて保存]ダイアログボックスを表示するショートカットキーは、[F12]キーです。覚えておくと便利ですね。

アクティブセルの行と列を色付きにしたい場合

また、アクティブセルのある列も色付きにしたいのであれば、条件付き書式の数式を下のように編集します。

条件付き書式を編集する場合は、[ホーム]タブの[スタイル]グループにある[条件付き書式]をクリックして、[ルールの管理]をクリックします。
条件付き書式のルールの管理

そして、数式を設定したルールを選択して[ルールの編集]をクリックします。
[条件付き書式ルールの管理]の[ルールの編集]ボタンをクリック

[書式ルールの編集]ダイアログボックスが表示されますので、数式を以下のように書き換えます。

=OR(CELL("ROW")=ROW(), CELL("COL")=COLUMN())

書式ルールの編集

CELL("COL")は、対象範囲にある左上隅にある列番号を返します。
COLUMN()は、COLUMN関数が入力されているセルの列番号が返されます。

COLUMN 関数 - Office サポート

これで、アクティブセルの行と列が色付きになります。
アクティブセルの行と列

条件付き書式のルールの削除(ルールのクリア)

条件付き書式のルールを削除するには、条件付き書式を編集する場合は、[ホーム]タブの[スタイル]グループにある[条件付き書式]をクリックして、[ルールの管理]をクリックします。
条件付き書式のルールの管理

そして、削除したいルールを選択して[ルールの削除]をクリックします。
[条件付き書式ルールの管理]から[ルールの削除]ボタンをクリック

または、[ホーム]タブの[スタイル]グループにある[条件付き書式]をクリックして、[ルールのクリア]をポイントして表示されるサブメニューの[選択したセルからルールをクリア]や[シート全体からルールをクリア]などを選択しても良いです。目的に合った方法で削除してください。
[条件付き書式]の[ルールのクリア]

参考コードを削除する場合は、コードを入力したThisWorkBook、またはシートモジュールを表示して、入力したコードを全て削除してください。

関連以下は、条件付き書式に関するページです。

条件付き書式のデータバーを活用して点数をグラフ化

Excel2010で試験の点数をデータバーを使ってグラフ化した方から、2つの質問を受けました。 作成された表は下図のようになっていました。 ...

続きを見る

条件付き書式のアイコンセットの区分け

Excel2010以降の条件付き書式の[アイコンセット]は便利ですが、アイコンセットのアイコンの種類を区分けする範囲は既定で決められています ...

続きを見る

条件付き書式のコピー

Excel2010に限ったことではありませんが、条件付き書式は、コピー、貼り付けして使用することができます。 条件付き書式の設定 たとえば、 ...

続きを見る

条件付き書式のデータバーにマイナスの値も表示可能

Excel2010の条件付書式のデータバーでは、マイナスの値も表示可能になりました。 条件付き書式のデータバー まず[条件付き書式]のデータ ...

続きを見る

2つの列の差分を求める(重複しない一意の値を求める)

Excelで2つの列にデータが入力されていて、そのデータの差分を求めたい場合がありますね。 たとえば、下のようにA列には分析用データとして別 ...

続きを見る

クイック分析で簡単データ分析

クイック分析は、Excel2013からの機能です。セル範囲を選択すると、選択範囲の右下に[クイック分析]のボタンが表示されます。このボタンを ...

続きを見る

セル範囲の中から数値に見える文字列のセルを見つけるには

Excelのセルに数値が入力されていると思っても、実際は文字列だったということがあります。見た目は数値に見えても表示形式は文字列になっている ...

続きを見る

条件付き書式のデータバーを右から左へ表示するには

以下の記事はExcel2003で解説しています。

条件付き書式の活用(土日のセル背景に色をつける)

Excelの条件付き書式は便利ですね。 たとえば、毎月の予定表をExcelで作成しているとします。 土曜日は、薄い水色の塗りつぶし、日曜日は ...

続きを見る

おすすめ記事と広告

記事を更新しました

図形の書式設定のグラデーション

Office2010では、[図形の書式設定]のグラデーションの設定が分かり易くなりました。 Office2007では、Wordはまだ[オート ...

変更履歴テーブルの作成

追加クエリを使用して、テーブルに変更履歴を残す方法です。 [T_売上]テーブルは、下のようになっています。[ID]が主キーとなっています。 ...

ペイントで同じ大きさの画像に揃える

Windows7のペイントでばらばらの大きさの写真を指定された大きさに切り抜く方法です。 下のように大きさがばらばらの写真が3枚あります。 ...

ヘッダーまたはフッターにファイルのパスを表示(Word2010)

Word2010でヘッダーまたはフッターにファイルのパス名を表示する方法です。 [挿入]タブの[ヘッダーとフッター]グループの[ヘッダー]を ...

重複データを入力したらメッセージを出す

受付番号を入力したときに、既に入力済みの番号であればメッセージを表示して、注意を促したい場合がありますね。その場合の方法です。 テーブル[T ...

-Windows7 & Office2010 Excel2010

Copyright © 2001-2018 初心者のためのOffice講座 All Rights Reserved.

Copyright© 初心者のためのOffice講座 , 2018 AllRights Reserved Powered by AFFINGER4.