|
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")
にあたる動作は、抑止できない、ということです。)
もちろん、セルは入力箇所以外は、保護してセレクトできないようにしてあります。
簡単なツマヅキだったら申し訳ないのですが、
どなたかご教示ください。お願いします。
|
|