Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


54477 / 76732 ←次へ | 前へ→

【27046】Re:セルの色塗りを検出する方法
質問  agalinman  - 05/7/27(水) 8:43 -

引用なし
パスワード
   ▼知ろう途 さん:

agalinman です。

知ろう途 さん、新たな発想をありがとうございます。
試しちょこっとやってみました。

>Private Sub Worksheet_SelectionChange(ByVal Target As Range)

で元々のセルの値を退避して

> Private Sub Worksheet_Change(ByVal Target As Range)

で色を塗るための数字指定で色塗り

というロジックだと理解しました。
確かに Worksheet_Change ですので、計算結果が更新されて、
いい感じに見えたのですが・・・。

この方法だと、何も入力されていないセルに、たまたま色を指定する数字と
同じ数字を入力したい場合、希望したい色に塗られないことがあるし、
元々が何も入力されていないため、入力した数字が消えてしまいますよね。

具体的には、お教え頂いたコードをサンプルとすると、
何も入力されていないセル B2 に "2" という数字を入力して、
色を"青"にしたい場合
などが該当します。

>あ!それとエラー処理は未だに良くわからないのでおまかせします。

おっしゃる通り、例外処理がやっかいそうですよね。
1 hits

【27017】セルの色塗りを検出する方法 agalinman 05/7/26(火) 16:52 質問
【27021】Re:セルの色塗りを検出する方法 IROC 05/7/26(火) 17:04 回答
【27023】Re:セルの色塗りを検出する方法 agalinman 05/7/26(火) 17:14 お礼
【27039】Re:セルの色塗りを検出する方法 知ろう途 05/7/27(水) 0:14 発言
【27046】Re:セルの色塗りを検出する方法 agalinman 05/7/27(水) 8:43 質問
【27047】Re:セルの色塗りを検出する方法 知ろう途 05/7/27(水) 9:05 発言
【27051】Re:セルの色塗りを検出する方法 agalinman 05/7/27(水) 9:44 お礼

54477 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free