エクセルでこんなマクロを組みたいんです。（初心者です）

質問

エクセルでこんなことしたいんです。特定のセルをクリックすると、
そのセルだけ色が変わるような操作って、できますでしょうか？
今、エクセルでアンケート表を作っていまして、例えば「はい」と記載されたセルをクリックするとそのセルの色だけが青に変わる・・・みたいなイメージです。
ご存知の方、どうかお力を貸していただけませんでしょうか？
よろしくお願い致します。

回答No.6

pen_pen_pen

考え方を変えるとしたらで、他の方法を考えました。
回答の列に[データ]－［入力規則]を使い、
リストから「はい」と「いいえ」を選択させます。

回答のセルをアクティブにした状態で
メニューの、[データ]→[入力規則]
「設定」タブの
入力値の種類：リスト
元の値：はい,いいえ
と入力すると、リストから「はい」か「いいえ」を選べます。
それをオートフィルで回答セル全部にコピー。
A　　　　B
------------------------
1|設問１　いいえ
2|設問２　はい　　←リストから選択入力してもらう。

集計するには、COUNTIF関数で回答列の「はい」の数を数えます。
条件付書式で「はい」のセルの色を変えるようにすれば視覚的にも分かります。
は、どうでしょうか？
マクロじゃないので、ブックを開いた時の警告も出ずに、いいと思うのですが。

回答No.5

noname#79209

> そのセルの色だけが青に変わる

という文章からでは、「アクティブセルの色が変わる」と取れますが、アクティブセルは自動的に色が変わるので、質問の意味がありません。
従って、「アクティブセルの内容と同じデータのセルの色を変える」と言う意味ではと強引に解釈します。

だとすると、「はい」と記載されたセルを確認したいわけですから、考え方を変えてオートフィルタを使うという方法はダメなのでしょうか。

回答No.4

SV576

ご希望のことは、できますが、そういう場合は「オプションボタン」を使ったほうがいいですよ。
やってみると解りますが、「はい」と入ったセルをクリックで選択、というのはユーザーにとって非常に使いづらいです。
ユーザーにとってセルは入力する際にクリックするものでもあり、また「はい」を選びたいときにはクリックするのだと推測しにくく、かなり勝手が違います。
さらに、そもそもこういうときのために用意されているのがオプションボタンなので、はるかに簡単です。

オプションボタンは、
（１）
メニューの「表示」→「ツールバー」→「フォーム」をクリック
（２）
ボタン群が表示されるので、「オプションボタン」というボタンをクリック
（３）
シート上の配置したい場所で、マウスドラッグ

これで配置されます。
オプションボタンの使い方が解らなければ、またあらためて質問するといいと思います。

回答No.3

Selfishness

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Text = "はい" Then
Selection.Interior.ColorIndex = 6
End If
End Sub

こんな感じかな？
「はい」のセル全ての色が変わるようにしたいなら「条件付書式」でいいような気もするけど、「クリックしたら」なので、ダメなのかな？

エクセルでマクロ作るときは基本的な動作を「新しいマクロの記録」（ツール＞マクロ）で作ってそこに付加価値を付けると簡単に出来ますよ。
今回の場合で言えば、塗りつぶしを記憶させてIF文で囲むような感じ。
シートにするか、ブックにするか、モジュールにするかは場合によって判断してください。

回答No.2

2531kbps

仕様は分かったけど、その土台となるコードはないのでしょうか？どの*点*が不明なのか書けばそこをピンポイントで回答してくれるはずですよ。初心者というのは免罪符になりません。

回答No.1

BLUEPIXY

マクロではないのですが、
適当なセルに、（バケツ：塗りつぶしの色で）青の色をつけて
ブラシ：書式のコピー/貼り付けをダブルクリックしてから
色を変えたいセルをクリックすると、
次々にクリックしたセルの色を変えられます。
やめるときはＥＳＣキーを押します。