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で質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで別シートの同じ位置...
-
EXCELでコピーしたグラフのデー...
-
エクセルでセルの書式設定がで...
-
ワークシートの行が途中から表...
-
シート全体を他のブックのシー...
-
エクセルの下部のシートタブの...
-
ロックしたセルのコピー&貼り付け
-
Excelで保護のかかったシートの...
-
エクセルで数式は残したまま他...
-
excelで勝手にテキストボックス...
-
Excelで大量の2000個のリストを...
-
行の挿入ができなくなった
-
worksheetクラスのcopyメソッド...
-
シート保護してても並び替えを...
-
スプレッドシートが真っ白にな...
-
VBA アクティブでないシートの...
-
【Excel マクロ】貼り付け先の...
-
エクセルで選択した行以外を削...
-
エクセルVBA シートの保護につ...
-
シート保護したExcelへの画像貼...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで別シートの同じ位置...
-
エクセルの下部のシートタブの...
-
EXCELでコピーしたグラフのデー...
-
エクセルでセルの書式設定がで...
-
ワークシートの行が途中から表...
-
ロックしたセルのコピー&貼り付け
-
シート全体を他のブックのシー...
-
エクセルで数式は残したまま他...
-
Excelで保護のかかったシートの...
-
excelで勝手にテキストボックス...
-
VBA アクティブでないシートの...
-
Excelで大量の2000個のリストを...
-
シート保護してても並び替えを...
-
【エクセル】数式のセル番地を...
-
【エクセル】表から条件に合っ...
-
スプレッドシートが真っ白にな...
-
シート保護したExcelへの画像貼...
-
行の挿入ができなくなった
-
Excelでハイパーリンク先の表示...
-
worksheetクラスのcopyメソッド...
おすすめ情報