Excel VBA質問箱 IV

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

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


10967 / 13644 ツリー ←次へ | 前へ→

【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 お礼[未読]

【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")
   にあたる動作は、抑止できない、ということです。)
もちろん、セルは入力箇所以外は、保護してセレクトできないようにしてあります。

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

【18884】Re:ドラッグアンドドロップを抑止したい。
回答  IROC  - 04/10/15(金) 15:53 -

引用なし
パスワード
   標題の内容は、保護で制限するしかないと思います。

それよりも
>ユーザーが、セルをコピペすると、コードの参照がうまくいかなくなってしまいます。
この部分について、具体的に説明していただけませんか?

【18885】Re:ドラッグアンドドロップを抑止したい。
お礼  day  - 04/10/15(金) 16:08 -

引用なし
パスワード
   申し訳ありません。
2日悩んでいたので、諦めていたのですが、
なにげな〜くいじってたら見つかりました。

  Application.CellDragAndDrop = False

で、いけそうです。
すみませんでした。

【18886】Re:ドラッグアンドドロップを抑止したい。
お礼  day  - 04/10/15(金) 16:14 -

引用なし
パスワード
   IROC さん、すみません。ありがとうございました。

>標題の内容は、保護で制限するしかないと思います。
>
>それよりも
>>ユーザーが、セルをコピペすると、コードの参照がうまくいかなくなってしまいます。
>この部分について、具体的に説明していただけませんか?

動かされてしまったセルを、他のセルで関数で使わせて、
その値を、マクロで扱うということをしてたので、
それがうまく動作しなくなるという程度のニュアンスでしたM(_ _)M

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