|
ウインドウスXP、エクセル2003を使用しています。
ワークシートのダブルクリックイベントで、
下記のようなコードを使い、
ダブルクリックしたセルに○が記入されるようにしています。
が、特定のセルに文字入力をするとき、
ダブルクリックをして入力しようとすると、
その場合にも○が付いてしまいます。
ツールバーから入力する方法で問題は回避できますが、
例えばH4と、H6と、I18など、
特定のセルを除いて、このイベントを実行することは
可能でしょうか。
どのようなコードをどの位置に足すべきでしょうか。
どうぞ宜しくお願いいたします。
===============================
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim c As Range
Cancel = True
With Target
Me.Shapes.AddShape(msoShapeOval, .Left, .Top, .Width, .Height).Fill.Visible = False
End With
End Sub
|
|