エクセル２００３で最後に入力したセルに色を付ける方

質問

宜しくお願いいたします。
Excel2003を使用しています。
毎日、環境測定結果をシートに入力しています。
最後に入力したセルに色を付ける方法はありますでしょうか。

回答No.2

web2525 · ベストアンサー

マクロですが

Private Sub Worksheet_Change(ByVal Target As Range)

Cells.Interior.ColorIndex = xlNone
Target.Interior.Color = 65535

End Sub

コレは黄色に塗りつぶしの例

お礼

回答者様のエクセルの知識に感服します。
有難うございました。

回答No.4

tsubuyuki

横からしゃしゃり出て申し訳ないですが・・
> 毎日、環境測定結果をシートに入力しています。
さて、どんな項目をどのように入力されているのでしょう？
毎日漏れなく間違いなく入力しているのであれば全く問題ないのですが、
後日手直しをするようなケースが発生してしまうと、
それが「最後に入力したセル」と認識されてしまいませんか？
これで不具合が生じないのであれば、＃２さんのご回答が最適と思われます。

そうじゃない。いつでも最新データに色を付けたいんだ。
というのであれば、データ入力の際にもう一工夫。
入力するべき項目「測定日」あるいは「測定時刻」を追加し、
それを以て条件付き書式をつけてやるのが良いと思われます。

つまり、Ａ列に色を付けたいのであれば、Ｂ列（ＤでもＺでも良いですよ）に
「測定日」あるいは「測定時刻（日付込）」を追加しておき（※既にあるなら不要）
例えばＡ２セルを選択した状態で　書式⇒条件付き書式　を選択、
「数式が　=B2=MAX(B:B)」として、書式を設定、必要な分だけ書式をコピーしてやります。
これで「Ｂ列（日付）が最大＝最新データ」の行のＡ列に色が付きます。

ご質問が非常に曖昧でわかりづらいところがありますが、
あなたの質問文をこう解釈した人間もいますよ、ということで参考までにどうぞ。

お礼

回答者様のエクセルの知識に感服します。
有難うございました。

回答No.3

tom04

No.1です。

No.2さんの回答を拝見して・・・
質問文の
＞毎日、環境測定結果をシートに入力しています。
＞最後に入力したセルに色を付ける方法はありますでしょうか。

を素直に解釈するとNo.2さんの回答のように
「最終入力セル」と解釈した方が正解のようですね！

No.1はその「列の最終行」という解釈ですので、
おそらく的を外していると思います。

どうも失礼しました。m(_ _)m

お礼

回答者様のエクセルの知識に感服します。
有難うございました。

回答No.1

tom04

こんにちは！

A列の最終データセルに色を付ける方法の一例です。

A列すべてを範囲指定　→　書式　→　条件付き書式　→　「数式が」を選択　→　右側の数式欄に
=AND(A1<>"",COUNTA(A$1:A1)=COUNTA(A:A))
という数式を入れ　→　書式　→　パターン　→　好みの色を選択しOK

※　A列データは数式によって表示されているデータではなく、手入力による生データとします。
仮にIF関数などによって「空白」に見えるセルは空白セルと判断されませんので
数式が入っている最終行に色がついてしまいます。m(_ _)m

お礼

回答者様のエクセルの知識に感服します。
有難うございました。