|
▼さちこ さん
こんにちは^^
> Cancel = Trueの前に、どのようなコードを書けばよいでしょうか。
Cancel = True は、その処理を無効にする処理じゃなくて、
「編集モード」になることを無効にしているようです。
(試したところ・・・)
ということで、
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address(0, 0) = "A3" Or Target.Address(0, 0) = "B5" Then
Cancel = True
Exit Sub
End If
With Target
Me.Shapes.AddShape(msoShapeOval, .Left, .Top, .Width, .Height).Fill.Visible = False
End With
Cancel = True
End Sub
かなあ・・・
ただ、↑のように「A3」か「B5」の時は円を描かない→それ以外は円を描く・・という処理より、
「A3」でもなく「B5」でもない時に円を描く処理をする・・・の方がすっきりするかもです^^
|
|