エクセル2000です。
データを入力させるためのいくつかのセルを色を変え、ロックをはずしてシートを保護をかけたのですが、ロックされていないセル同士では、ドラッグ&ドロップでセルが上書きされます。
ロックしていないセル同士なのでデータが上書きされることだけでは別に問題はないのですが、ドラッグ&ドロップだとドラッグされた元のセルの書式(色)が無くなってしまいます。
そして何よりも一番困るのは、上書きされたセルを参照している計算式が、#REF!エラーになってしまうことと、ドラッグされた元のセルを参照している数式のセル番地が変わってしまうことです。
入力は可能でドラッグ&ドロップを不可とする方法はないでしょうか?
なお、入力データが同一な数値の連続ということもあるのでオートフィルはできた方がありがたいのですが、ドラッグ&ドロップを不可とする都合上できなるなるならやむをえません。
なにとぞ良い解決方法をご教示ください。
No.2ベストアンサー
- 回答日時:
Excelのオプションで
「フィルハンドルおよびセルのドラッグ&ドロップを使用する」
のチェックを外して「OK」で、ドラッグ&ドロップが禁止できます。
ただし、フィル入力もできなくなります。
オートフィルしたいときはメニューから実行すれば良いでしょう。
Excel2007なら
[ホーム]タブの[編集]グループで[フィル]→[連続データの作成]を実行します。
旧Excelなら
メニューバーの[編集]→[フィル]→[連続データの作成]を選択します。
マクロでシートが選択されたら
Private Sub Worksheet_Activate()
Application.CellDragAndDrop = False
End Sub
して
非選択になったら
Private Sub Worksheet_Deactivate()
Application.CellDragAndDrop = True
End Sub
で元に戻せば便利だとおもいます。
ご丁寧にありがとうございます。
複数シートにまたがるのと、このBOOKをひらいていると他のBOOKでドラッグできなっても困るので、以下のようにしたところうまくいきました。
ありがとうございました。
Dim dd As Boolean
Private Sub Workbook_Open()
dd = Application.CellDragAndDrop
If dd Then Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_Activate()
Application.CellDragAndDrop = False
End Sub
Private Sub Workbook_Deactivate()
Application.CellDragAndDrop = dd
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CellDragAndDrop = dd
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) シート参照を含む数式を連続コピー 3 2022/12/10 11:42
- Excel(エクセル) Excel ヘルプの[ロック解除]、<c0>、</c0> の意味は何ですか? 1 2023/02/20 16:58
- Excel(エクセル) エクセル バーコード作成で他のシートを参照するには? 2 2023/05/03 16:57
- Excel(エクセル) ユーザー定義について質問です。 2 2023/06/28 13:21
- Excel(エクセル) 【エクセル】文中に別シートのセルの内容を自動入力したい 6 2022/11/17 11:30
- Excel(エクセル) IFERROR(IF()IF())のような形の構文が作れません 2 2023/02/05 17:51
- Excel(エクセル) エクセルの条件付き書式で*を使いたい 4 2022/05/13 16:49
- Excel(エクセル) 複数セルデータを別シートの単一セルにコピーしたい。(詳細をご参照ください) 1 2022/12/14 15:08
- Excel(エクセル) エクセルでシート保護のかかり方の違いとセルの非保護の設定 3 2022/08/09 10:02
- Excel(エクセル) 条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
Excel 十字矢印によるセル移動の禁止
Excel(エクセル)
-
Excel2013で切り取り禁止
Visual Basic(VBA)
-
EXCEL、セルのコピー・貼り付けを禁止したい
Excel(エクセル)
-
-
4
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
5
VBAで、貼り付け禁止命令を実現したい(エクセル)
Visual Basic(VBA)
-
6
Access VBAで行ラベルが定義されていないというエラーが出ます
Access(アクセス)
-
7
エクセルでエラーが出て困っています。
Excel(エクセル)
-
8
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
9
EXCEL 表の書式のみ変更不可(保護)したい
Excel(エクセル)
-
10
エクセルファイルのシート毎の容量
Excel(エクセル)
-
11
Excel VBAでのWorksheet_Changeが動作しない原因
Excel(エクセル)
-
12
コマンドボタンやイメージにマウスをのせるとボタン名を表示したい
Excel(エクセル)
-
13
VBAでループ内で使う変数名を可変にできないか。
Visual Basic(VBA)
-
14
ウォッチ式の文字数制限について
Visual Basic(VBA)
-
15
エクセルVBA/イベント発生でコピペ不能はなぜ?
Excel(エクセル)
-
16
エクセルvba (ByVal Target As Range)について
Excel(エクセル)
-
17
エクセルマクロを有効にしないとファイルが開けないようにする方法
Excel(エクセル)
-
18
シートを保護しても入力規則を使えるようにしたい
Excel(エクセル)
-
19
E列のセルに数値が入れば(空白でなければ)B列の同じ行のセルに色がつく
その他(Microsoft Office)
-
20
Filter関数を用いた結果、何も検索されなかった場合
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルでマウスカーソルの形...
-
未成年ですがドンキでオナホ買...
-
Excelピボットテーブルで余計な...
-
ドンキに18禁コーナーじゃない...
-
蛍光灯はドラッグストアで売っ...
-
エクセルで特定のセル以下の全...
-
Snipping Toolで切り取った画像...
-
タスクバーからデスクトップへ...
-
エクセルの式をドラッグコピー...
-
Excel(エクセル)で価格帯別に...
-
ドラッグストアでTENGAを買おう...
-
ワードで、表をずらしてから表...
-
PowerPointを使っているのです...
-
ラベルとテキストボックスのグ...
-
エクセルの行の幅を一部だけ変...
-
イラレで急に日本語が打てなく...
-
Wordで段落番号が2桁になったと...
-
線のスタイル(太さ)をまとめ...
-
第1四半期を「4月、5月、6月...
-
エクセルでずっとドラッグして...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
未成年ですがドンキでオナホ買...
-
エクセルでマウスカーソルの形...
-
ドンキに18禁コーナーじゃない...
-
タスクバーからデスクトップへ...
-
ドラッグストアでTENGAを買おう...
-
エクセルで特定のセル以下の全...
-
蛍光灯はドラッグストアで売っ...
-
ワードで1ページに同じ内容の...
-
コスモスにTENGAは売っています...
-
正露丸のレシートは医療控除に...
-
ワードで、表をずらしてから表...
-
Excelピボットテーブルで余計な...
-
通常、ドラッグストアとコンビ...
-
Excel(エクセル)で価格帯別に...
-
Snipping Toolで切り取った画像...
-
性交痛にベビーオイルがよいと...
-
線のスタイル(太さ)をまとめ...
-
エクセルの式をドラッグコピー...
-
Wordで段落番号が2桁になったと...
-
ドラッグストアーのコスモスっ...
おすすめ情報