
No.9ベストアンサー
- 回答日時:
#6 のWendy です。
一行抜けていました。
----------------------------------------------------
'<標準モジュール>
Sub Auto_Open()
'キーの設定
Application.OnKey "{Enter}", "MovePoint"
Application.OnKey "~", "MovePoint" '←加えた
End Sub
Private Sub MovePoint()
On Error Resume Next
'設定したいシート名を入れる
If ActiveSheet.Name = "Sheet1" Then
ActiveCell.Offset(1, -1).Select
斜め左下へ
Else
ActiveCell.Offset(1).Select
'下に
End If
On Error GoTo 0
End Sub
Sub Auto_Close()
'キーの解除
Application.OnKey "{Enter}"
End Sub
昨日の時点では自分には到底できそうにないと諦めていたんですが、できました!本当に丁寧かつご親切な回答をいただけて感謝しております。つたない質問に何度もお返事をいただいたこと、深くお礼申し上げます。ありがとうございました!!!!!
No.8
- 回答日時:
No.6さんとほとんど同じですが、図をつけて細かく説明してあります。
参考URLをご覧ください。
参考URL:http://www.excel-jiten.net/data_entry_edit/activ …
No.7
- 回答日時:
ご質問の状況を見ての推測となってしまいますが…
もしかして、「シート保護」という設定をいじられましたか?
私の受けた印象では、恐らく「シート保護」の設定のオプションが変わってしまっているのではないかと思います。
Excelのバージョンによっては、私の推測はまるっきり見当違いになってしまうのですが、多少の可能性があるのなら…ということで、回答を入れておきますね。
== 以下、Excel2002での操作となります ==
対象のシートで、
【ツール】-【保護】を選択したときに、
【シートの保護】、もしくは【シート保護の解除】というメニューが選択できるかと思います。
もし【シート保護の解除】が表示される場合には、
いったん【シート保護の解除】を選択して、もう一度【ツール】-【保護】を選択してください。
そうすると、【シートの保護】というメニューが表示されるようになるかと思います。
1. 【ツール】-【保護】-【シートの保護】を選択
2. 「このシートのすべてのユーザーに許可する操作」の、「ロックされたセル範囲の選択」という項目のチェックマークをオフにする
3. OKボタンをクリック
※左斜め下に移動していたということですので、【ツール】-【オプション】の「編集」パネルの、入力後にセルを移動する方向は"右"または"下"にしてみてください。
以上の操作で解決できそうですかね・・
もし、以上の操作で、どのセルも選択できないような状況になってしまったとしたら、私の推測は大ハズレです(汗)
【ツール】-【保護】-【シートの保護の解除】で、セルの編集ができる状態に戻ります。
保護をかけることにより、選択や変更できるセルを限定することができます。
左斜め下への移動というのは、ちょっと特殊な移動だったので、そこから推測をさせていただきました。
見当違いな回答でしたらすみません。
大変ご親切な回答を下さいまして、ありがとうございました!やってみたんですが、[ツール]-[保護]で保護の対象は、データ・オブジェクト・シナリオの3項目しかなく、「このシートのすべてのユーザーに許可する操作」「ロックされたセル範囲の選択」というのはありませんでした。EXCEL2000だからかな?
私のつたない質問に、こんなに丁寧に説明いただいたこと、感謝します。本当にありがとうございました!
No.6
- 回答日時:
こんばんは。
Alt+F11 で、Visual Basic Editor 画面を開けたら、挿入-標準モジュールをクリックして、以下を貼り付けます。再び、Alt + F11 で閉じて、一旦、保存して、そのブックを終了させます。再度、開くと、設定がされています。
特定のシートを設定させるには、以下のようにシート名を入れてください。
'----------------------------------------------------
'<標準モジュール>
Sub Auto_Open()
'キーの設定
Application.OnKey "{Enter}", "MovePoint"
End Sub
Private Sub MovePoint()
On Error Resume Next
'設定したいシート名を入れる
If ActiveSheet.Name = "Sheet1" Then
ActiveCell.Offset(1, -1).Select
斜め左下へ
Else
ActiveCell.Offset(1).Select
'下に
End If
On Error GoTo 0
End Sub
Sub Auto_Close()
'キーの解除
Application.OnKey "{Enter}"
End Sub
No.5
- 回答日時:
こんばんは。
何か、ご質問の内容が良く分りません。
>左斜め下(改行のような感じ)へと移動させるにはどう設定すればいいんでしょうか?
左斜め下というと、B1 →A2 ということになるのですが、そういうロジックでは、問題がないのでしょうか?A2 になったら、行き場所を失うということですか?
私たちの西側の言語では、上から下に、左から右に、セルポインタが進むのが、標準的な設定ですから、それ以外の言語をお使いにならない限りは、Enter で、右から左下というのは、不便だと思います。
>あるシートだけが真下に移動してたのでそれを変更したら、全てのシートにおいて、その設定が反映されてしまいました。
その設定は、そのシートのみでなくてはならない、ということなのでしょうか?「その設定」というもので、Excelで設定できたのですか?それは、一体、どのようにしたのか、おおよそでもお聞かせくださいませんか?Excelのオプション設定なら、私は分りません。
もちろん、マクロは出来ます(ただし、Worksheet_SelectionChangeではありません)が、ただ、こちらも納得の行くものでなければ、公開しても為になりませんからね。
説明不足ですみません。B2→A1というように移動させたいのです。決して不便な使い方ではありません。
オプション設定のように単純なものではなさそうですね。マクロを教えていただけたとしても、恐らく私には組めないような気がします。それがわかっただけでも参考になりました。ありがとうございました!
No.4
- 回答日時:
EXCELはあらかじめ選択したセル上を順に移動する機能があります。
1.Ctrlキーを押したままでセルA1,B2,C3,D4・・・と選択してセルの移動範囲を設定する。
2.Ctrlキーを話して、Enterを押してみてください。
斜めだろうが横だろうがお構い無しに、選択した順を追って移動します。
以前はその状態だったのでは?
いえ、セルをあらかじめ選択している状態ではありませんでした。普通にセルに入力して、また次の左斜め下のセルに入力したいんです(;_;)かなりのデータを入力しなければならないので、少しでも手間を省ければと思ってるんですが・・・変にいじるんじゃなかった(涙)
ご回答、ありがとうございました!!!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelで図の書式設定を移動したい 1 2022/10/07 15:32
- Excel(エクセル) エクセルの編集オプション セル移動 2 2022/04/02 09:19
- Excel(エクセル) Windows 10でエクセルの入力をしていますが、エンターを押すことなく矢印で途中までは右へ移動し 3 2022/07/14 14:04
- gooブログ 記事の下にスクロールバーが表示される 2 2022/08/19 20:42
- PowerPoint(パワーポイント) ExcelのVBAコードについて教えてください。 3 2022/05/25 14:32
- Visual Basic(VBA) エクセルマクロでアニメを作る方法を教えてください。 1 2023/02/07 14:27
- Excel(エクセル) Excel ヘルプの[ロック解除]、<c0>、</c0> の意味は何ですか? 1 2023/02/20 16:58
- Excel(エクセル) Excelのマクロについて教えてください。 4 2022/05/31 14:07
- AJAX ワードでA3横の画面にして、文字入力はA4縦にしたい 1 2023/05/04 13:59
- 画像編集・動画編集・音楽編集 Google Earth Pro 高速道路上空を一定の速度で飛ぶツアー動画の作り方は?? 1 2022/06/01 15:10
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルの下部のシートタブの...
-
エクセルで別シートの同じ位置...
-
シート全体を他のブックのシー...
-
ワークシートの行が途中から表...
-
Excelで保護のかかったシートの...
-
EXCELでコピーしたグラフのデー...
-
エクセルでセルの書式設定がで...
-
excelで勝手にテキストボックス...
-
エクセルで数式は残したまま他...
-
行の挿入ができなくなった
-
VBA アクティブでないシートの...
-
【エクセル】表から条件に合っ...
-
スプレッドシートが真っ白にな...
-
worksheetクラスのcopyメソッド...
-
ロックしたセルのコピー&貼り付け
-
シート保護したExcelへの画像貼...
-
エクセルで選択した行以外を削...
-
エクセルのマクロについて教え...
-
ExcelのFileサイズの急な肥大化
-
Excelでハイパーリンク先の表示...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで別シートの同じ位置...
-
エクセルの下部のシートタブの...
-
エクセルでセルの書式設定がで...
-
シート全体を他のブックのシー...
-
ワークシートの行が途中から表...
-
EXCELでコピーしたグラフのデー...
-
Excelで保護のかかったシートの...
-
エクセルで数式は残したまま他...
-
ロックしたセルのコピー&貼り付け
-
VBA アクティブでないシートの...
-
excelで勝手にテキストボックス...
-
Excelで大量の2000個のリストを...
-
シート保護してても並び替えを...
-
行の挿入ができなくなった
-
エクセルのマクロでコピー後の...
-
シート保護したExcelへの画像貼...
-
【エクセル】表から条件に合っ...
-
スプレッドシートが真っ白にな...
-
フィルタされたものを切り取り...
-
【エクセル】数式のセル番地を...
おすすめ情報