Excel VBA質問箱 IV

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

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


62456 / 76732 ←次へ | 前へ→

【18883】ドラッグアンドドロップを抑止したい。
質問  day  - 04/10/15(金) 15:50 -

引用なし
パスワード
   VBA数ヶ月目です。
シートを、罫線で仕切って、フォームのように入力をさせ、
別シートに保存するというデータベースを作ったのですが、
ユーザーが、セルをコピペすると、コードの参照がうまくいかなくなってしまいます。
そこで、ここの過去ログを参考にしながら、

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 If Application.CutCopyMode <> False Then Application.CutCopyMode = False
End Sub

このようなコードでコピーモードを解除することにしたのですが、
それでも、ドラッグして、セルを移動することは防げません。
(  Selection.Cut(または、Selection.Copy)
   ActiveSheet.Paste
   にあたる動作は、抑止できても、
   Selection.Cut Destination:=Range("C4")
   にあたる動作は、抑止できない、ということです。)
もちろん、セルは入力箇所以外は、保護してセレクトできないようにしてあります。

簡単なツマヅキだったら申し訳ないのですが、
どなたかご教示ください。お願いします。

1 hits

【18883】ドラッグアンドドロップを抑止したい。 day 04/10/15(金) 15:50 質問
【18884】Re:ドラッグアンドドロップを抑止したい。 IROC 04/10/15(金) 15:53 回答
【18886】Re:ドラッグアンドドロップを抑止したい。 day 04/10/15(金) 16:14 お礼
【18885】Re:ドラッグアンドドロップを抑止したい。 day 04/10/15(金) 16:08 お礼

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