Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


26320 / 76732 ←次へ | 前へ→

【55743】Re:ダブルクリックイベントで・・
お礼  kazu  - 08/5/18(日) 12:41 -

引用なし
パスワード
   ▼kanabun さん:
kanabunさん
返事遅くなりました、すみません
ヨコ入り質問に丁寧な回答ありがとうございました。
ダブルで作図 右で削除使いやすいです 感謝!!

>> 右クリックされたら、図の削除 とすれば、ほんのちょっと簡単に
>
>右クリックで [A4:G40]内の 楕円図形を削除するときのサンプルです。
>
>Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
> Dim c As Range
> Dim ov As Oval
> 
> Set c = Intersect(Range("A4:G40"), Target)
> If c Is Nothing Then Exit Sub
> Cancel = True
> For Each ov In Me.Ovals
>  If Not Intersect(ov.TopLeftCell, c) Is Nothing Then
>    ov.Delete
>    Exit For
>  End If
> Next
>End Sub
0 hits

【55680】ダブルクリックイベントで・・ ふつつかもの 08/5/15(木) 16:26 質問
【55681】Re:ダブルクリックイベントで・・ kanabun 08/5/15(木) 16:51 発言
【55682】Re:ダブルクリックイベントで・・ ふつつかもの 08/5/15(木) 17:01 お礼
【55706】Re:ダブルクリックイベントで・・ kazu 08/5/16(金) 11:44 質問
【55707】Re:ダブルクリックイベントで・・ kazu 08/5/16(金) 11:47 質問
【55716】Re:ダブルクリックイベントで・・ kanabun 08/5/16(金) 16:14 発言
【55718】Re:ダブルクリックイベントで・・ kanabun 08/5/16(金) 16:18 発言
【55719】Re:ダブルクリックイベントで・・ kanabun 08/5/16(金) 16:48 発言
【55743】Re:ダブルクリックイベントで・・ kazu 08/5/18(日) 12:41 お礼

26320 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free