
No.2ベストアンサー
- 回答日時:
こんばんは!
一案です。
苦肉の策ですが、範囲指定したセル上にオートシェイプの四角形を挿入する方法はどうでしょうか?
VBAになってしまいますが、一例です。
画面左下の操作したいSheet見出し上で右クリック → コードの表示 → VBE画面のカーソルが点滅しているところに
↓のコードをコピー&ペースト → Excel画面に戻り(VBE画面を閉じて)
色付けしたいセルを範囲指定(飛び飛びでも構いません)し、マクロを実行してみてください。
(Alt+F8キー → マクロ → マクロ実行です)
Sub 色付け() 'この行から//
Dim c As Range, mySp As Shape
If Selection.Count <= 1000 Then
For Each c In Selection
Set mySp = ActiveSheet.Shapes.AddShape(msoShapeRectangle, c.Left, c.Top, c.Width, c.Height)
With mySp
.Fill.ForeColor.RGB = RGB(255, 255, 0) '←黄色
.Line.Visible = False
End With
Next c
End If
End Sub 'この行まで//
※ 色は「黄色」にしています。
色を変更したい場合は
>RGB(255, 255, 0)
のRGB値で変更します。
尚、挿入した色付き四角形を削除したい場合も出てくると思います。
↓のコードを追加し、黄色の塗りつぶしを削除したい場合は
「削除」のマクロを実行してみてください。
Sub 削除()
Dim mySp As Shape
For Each mySp In ActiveSheet.Shapes
mySp.Delete
Next mySp
End Sub
※ 極端に選択範囲が広い場合(列全体とか行全体等々)の場合は
「応答なし」になる可能性がありますので、
範囲指定セル数は1000セル以内としてみました。
それより多く範囲指定した場合は
何も変化しません。m(_ _)m
回答ありがとうございます。
すごく丁寧なマクロ式までありがとうございます。
参考にさせて頂いて、挑戦してみます。ありがとうございました。
No.3
- 回答日時:
こんばんは
VBAまでご希望かわかりませんが、方針だけ
1.セルの色付けがされているかどうか判定するオリジナル関数をVBAで作成する。
2.作業セルを設けて対象のセルが色付けされたかどうかを作業セル上に表示させる。
3.条件付き書式の最優先項目に作業セルの状態を条件として入れて、書式設定しない。
1.2難しい場合は、作業セルを適当に設けて、色付けしたい場合に作業セルに
適当な値を入れて書式設定されないようにする。←これが一番簡単かな。
VBAのコードは対象が多くなるとなにか入力する度にマクロが動いて重くなったので、
あまり実用的ではなかったですね。
コードの組み方次第かもしれませんが。
回答ありがとうございます。
やはりVBAを使用しないと無理なのですね。
参考にさせて頂いて、挑戦してみます。ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA初心者です。 VBAで行単位で条件付き書式の色をカウントしたいです。 大量のデータがあるExc 3 2022/06/08 10:02
- Visual Basic(VBA) VBA初心者です。 VBAで行単位で条件付き書式の色をカウントしたいです。 大量のデータがあるExc 3 2022/06/08 10:00
- その他(Microsoft Office) エクセル 条件付き書式 日をまたぐ塗りつぶし 1 2023/01/13 18:00
- Excel(エクセル) エクセルで教えて下さい。 2 2022/05/18 13:00
- CGI VBAで条件から範囲を指定して色を塗る方法を知りたいです 1 2022/06/30 16:05
- その他(Microsoft Office) EXCELのセルへの色づけ 2 2023/06/07 01:22
- その他(Microsoft Office) マクロについて教えて下さい 3 2022/05/28 15:36
- Excel(エクセル) 半角ハイフンを除いた重複に色を付ける数式について 5 2022/09/08 20:43
- Excel(エクセル) Excel2007での条件付き書式について 6 2023/05/02 10:56
- その他(Microsoft Office) エクセル 表の移動 2 2023/04/05 20:29
このQ&Aを見た人はこんなQ&Aも見ています
-
あなたの「必」の書き順を教えてください
ふだん、どういう書き順で「必」を書いていますか? みなさんの色んな書き順を知りたいです。 画像のA~Eを使って教えてください。
-
いちばん失敗した人決定戦
あなたの「告白」での大失敗を教えてください。
-
あなたの「プチ贅沢」はなんですか?
お仕事や勉強などを頑張った自分へのご褒美としてやっている「プチ贅沢」があったら教えてください。
-
テレビやラジオに出たことがある人、いますか?
テレビやラジオに取材されたり、ゲスト出演したことある方いますか?
-
14歳の自分に衝撃の事実を告げてください
タイムマシンで14歳の自分のところに現れた未来のあなた。 衝撃的な事実を告げて自分に驚かせるとしたら何を告げますか?
-
条件付き書式(色変更)は、予め色が入ってるセルを除外(飛ばす)するルール追加はありますか?
Excel(エクセル)
-
エクセルでの日程表で土日に背景色をつけ,その下地に他の色を付けたい
その他(Microsoft Office)
-
Excelの条件付き書式設定の太い罫線
Excel(エクセル)
-
-
4
【Excel】 セルの色での判断はできますか?
Excel(エクセル)
-
5
Excelの条件付き書式を崩されたくない
Excel(エクセル)
-
6
EXCELで条件付き書式で空白セルの時は塗りつぶし無しにする方法
Excel(エクセル)
-
7
Excelでセル参照したとき、書式も一緒に持ってくるには?
Windows Vista・XP
-
8
エクセルで隣(右or左)のセルと同じ文字色にしたい
Excel(エクセル)
-
9
エクセル: セルの枠を超えて表示
Excel(エクセル)
-
10
結合したセルを含む列内で、条件付き書式として塗りつぶしたい
Excel(エクセル)
-
11
セルの塗りつぶしに透明度を設定する方法
Excel(エクセル)
-
12
条件付き書式で、結果が1行ずれる
Excel(エクセル)
-
13
セル入力文字が、「右のセルにはみ出す場合と」「はみ出さない場合」の違い
Excel(エクセル)
-
14
リストと一致する値のセルを塗りつぶしたい。
その他(Microsoft Office)
-
15
E列のセルに数値が入れば(空白でなければ)B列の同じ行のセルに色がつく
その他(Microsoft Office)
-
16
エクセルの複数のセルを一括で絶対参照にする方法
Excel(エクセル)
-
17
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
18
あるセルに特定の文字列を打つと、他のセルに決められた文字が自動入力するように
Excel(エクセル)
-
19
セルを結合したA4とA5の条件付き書式を結合しない行にも適用する方法を教えて下さい。
Excel(エクセル)
-
20
セルの文字を「印刷時だけ非表示」にしたいです。
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・一番好きなみそ汁の具材は?
- ・泣きながら食べたご飯の思い出
- ・「これはヤバかったな」という遅刻エピソード
- ・初めて自分の家と他人の家が違う、と意識した時
- ・いちばん失敗した人決定戦
- ・思い出すきっかけは 音楽?におい?景色?
- ・あなたなりのストレス発散方法を教えてください!
- ・もし10億円当たったら何に使いますか?
- ・何回やってもうまくいかないことは?
- ・今年はじめたいことは?
- ・あなたの人生で一番ピンチに陥った瞬間は?
- ・初めて見た映画を教えてください!
- ・今の日本に期待することはなんですか?
- ・集中するためにやっていること
- ・テレビやラジオに出たことがある人、いますか?
- ・【お題】斜め上を行くスキー場にありがちなこと
- ・人生でいちばんスベッた瞬間
- ・コーピングについて教えてください
- ・あなたの「プチ贅沢」はなんですか?
- ・コンビニでおにぎりを買うときのスタメンはどの具?
- ・おすすめの美術館・博物館、教えてください!
- ・【お題】大変な警告
- ・洋服何着持ってますか?
- ・みんなの【マイ・ベスト積読2024】を教えてください。
- ・「これいらなくない?」という慣習、教えてください
- ・今から楽しみな予定はありますか?
- ・AIツールの活用方法を教えて
- ・最強の防寒、あったか術を教えてください!
- ・歳とったな〜〜と思ったことは?
- ・モテ期を経験した方いらっしゃいますか?
- ・好きな人を振り向かせるためにしたこと
- ・スマホに会話を聞かれているな!?と思ったことありますか?
- ・それもChatGPT!?と驚いた使用方法を教えてください
- ・見学に行くとしたら【天国】と【地獄】どっち?
- ・これまでで一番「情けなかったとき」はいつですか?
- ・この人頭いいなと思ったエピソード
- ・あなたの「必」の書き順を教えてください
- ・14歳の自分に衝撃の事実を告げてください
- ・人生最悪の忘れ物
- ・あなたの習慣について教えてください!!
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
条件付書式で「=#N/A」に色を付...
-
E列のセルに数値が入れば(空白...
-
Excel にて条件付き書式の色に...
-
Excelの条件付き書式にて空白セ...
-
条件付き書式で、結果が1行ずれる
-
【Excel】条件付き書式で 0では...
-
エクセルで特定の数字等を表示...
-
【エクセル】シフトで○が6個以...
-
エクセルで1以上は全て1にするには
-
条件付き書式で太罫線を引く方法
-
エクセル:文字色を認識して○×...
-
【エクセル】今日の日付に赤枠...
-
エクセルの枠の中の文字が青文...
-
エクエルで隣のセルの文字が赤...
-
セルの値が空白じゃないなら色...
-
エクセル内で複数の文字(50個ぐ...
-
セル結合させてるときの 条件...
-
Excelのテキストボックスでフォ...
-
ピボットテーブルオプション「...
-
エクセルでシート参照する場合...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
条件付書式で「=#N/A」に色を付...
-
E列のセルに数値が入れば(空白...
-
条件付き書式で、結果が1行ずれる
-
Excel にて条件付き書式の色に...
-
エクセルで特定の数字等を表示...
-
Excelの条件付き書式にて空白セ...
-
【Excel】条件付き書式で 0では...
-
エクセルの枠の中の文字が青文...
-
エクセルで1以上は全て1にするには
-
エクセル内で複数の文字(50個ぐ...
-
一つ上のセルと同じセルに色を...
-
セル結合させてるときの 条件...
-
エクセル:文字色を認識して○×...
-
Excel 条件付書式 今日より3日...
-
【エクセル】シフトで○が6個以...
-
Excelについて あるセルに文字...
-
条件付き書式で太罫線を引く方法
-
【エクセル】今日の日付に赤枠...
-
エクセル 条件付き書式で色をつ...
-
ピボットテーブルオプション「...
おすすめ情報