マクロ　エクセル

締切済

質問者：higatano
質問日時：2006/07/20 20:33
回答数：2件

エクセルでボタンを押したらセルに色が付いてもう一度同じボタンを押したらそのセルの色が消えるというマクロは簡単に作れるものですか？
教えてください！

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (2件)

最新から表示
回答順に表示

No.2

回答者： NCU
回答日時：2006/07/20 21:58

フォームのチェックボックスのリンクセルの値によって条件付書式で色を変えるようにすれば、マクロなしで可能です。

- 0
- 件

通報する

No.1

回答者： mshr1962
回答日時：2006/07/20 20:51

操作を行いたいシートの見出しを右クリックして「コードの表示」で開かれる画面に下記のコードをコピーして閉じてください。

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Selection.Interior.ColorIndex = xlNone Then
Selection.Interior.ColorIndex = 6
Else
Selection.Interior.ColorIndex = xlNone
End If
End Sub

セルをダブルクリックすると黄色（ColorIndex = 6）になり
もう一度ダブルクリックすると無色（ColorIndex = xlNone）になります。

上記をボタンで操作したいなら、ボタンを作成後にダブルクリックすると
Private Sub CommandButton1_Click()

End Sub
というコードが作成されます。（CommandButton1は毎回違います。）
ここに上記のマクロの中（If文）だけをコピーしてください。