エクセルで作った表にワンタッチで色付けをしたいんです

エクセルで作った表をワンクリックで指定した色にしたいのですが、決まったルールの下に変えたいのでは無く自分で任意に決めたマスだけを変えたいのです。
できれば、マスを右クリック等で
よろしくお願いします

No.4 ベストアンサー 回答者： Batistuta 回答日時： 2005/11/02 13:25

No.2で回答した者です。

No.3の方が回答されているようにマクロを使うと一発でいけますが、違うアプローチの仕方をした方がより効果的かと思います。

先ほど書きましたように、

　１．Ctrlキーを押しながら色を変えたいマスをどんどんクリックしていきます。
　２．色の変更ボタンで色を変えます。

という手順を踏むと一括で色を変えられるのでグッと効率が上がると思います。
もしご存じなければ、とっても便利なのでお試しあれ。

どうしても一つずつ色を変えていかなければならない理由があるのでしたら、無用な老婆心でしたm(_ _)m

この回答へのお礼

ありがとうございます
簡単ですね、やってみます。

お礼日時：2005/11/03 00:51

No.3 回答者： moon00 回答日時： 2005/11/02 11:14

VBAマクロを使用すれば可能です。

ツール→マクロ→Visual Basic Editorを開き、
挿入メニューから標準モジュールを開きます。
そこに下のマクロをコピーしてください。
ここから----------------------
Sub celliro()
'アクティブセルの色を変える
With Selection.Interior
.ColorIndex = 3 '色番号指定
End With
End Sub

Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
'右クリックにアクティブセルの色を変えるマクロを設定
celliro
End Sub
------------------------------------ここまで
これで、右クリック１回でアクティブセルに色が付きます。
現在赤色になるように設定しています。色を変更するには、
「.ColorIndex = 3 」の数字を変更してください。
色番号は下記URLの下のほうに表がありますので参考にしてください。

作業が不要になりましたら、Visual Basic Editorの上記のコードを入れた
標準モジュールを削除してください。

参考URL：http://www.tsucchy.com/Excel/vb4_9.html

この回答へのお礼

スゴイ作業
しかし、この設定覚えられそうにありません・・・
でも経験で一度試してみます。　　　　　ありがとうございました

お礼日時：2005/11/03 00:49

No.2 回答者： Batistuta 回答日時： 2005/11/02 10:23

まずは書式設定のツールバーを表示させて下さい。

（やり方：メニューより、表示→ツールバー→書式設定）
そこに塗りつぶしボタンがありますから、必要なセルを選択しておいて、ボタンを押すだけです。

あと蛇足ですが、セルを選択する時にShiftやCtrlを押しながら選択するとキメ細やかな範囲選択が出来てとても便利ですよ。

この回答への補足

質問の出し方が不十分でしたすみません
塗りつぶしボタンを押すと一個のマスを変えるのに二回クリックになり、変えたいマスが多いいため二倍の時間がかかるので、どこかで設定するとその設定作業中はマスをワンクリックしたら変色させる事ができるようにです。
不十分ですみませんでした。

補足日時：2005/11/02 10:37

No.1 回答者： hidechan2004 回答日時： 2005/11/02 10:12

任意のセルをクリックして、書式設定ツールバーの塗りつぶしの色をクリックすれば出来ますが。

任意の色にする場合は、横の▼をクリックして選んでください。
ワンクリックとは行きませんが、これでどうですか？

この回答への補足

質問の出し方が不十分でしたすみません
塗りつぶしボタンを押すと一個のマスを変えるのに二回クリックになり、変えたいマスが多いいため二倍の時間がかかるので、どこかで設定するとその設定作業中はマスをワンクリックしたら変色させる事ができるようにです。
不十分ですみませんでした。

補足日時：2005/11/02 10:45