No.7ベストアンサー
- 回答日時:
単純にTABキーの移動制御のみであれば。
■ThisWorkBookモジュールに
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "{TAB}"
End Sub
■目的シートのSheetモジュールに
Private Sub Worksheet_Activate()
Application.OnKey "{TAB}", "MyTab"
End Sub
Private Sub Worksheet_Deactivate()
Application.OnKey "{TAB}"
End Sub
■標準モジュールに
Sub MyTab()
If Not TypeName(Selection) Like "Range" Then Exit Sub
If Intersect(Selection, Range("A1:B3,A4")) Is Nothing Then
Range("A1").Activate
ElseIf Selection.Address(0, 0) = "A4" Then
Range("B1").Activate
Else
Selection.Offset(1).Activate
End If
End Sub
イベントプロシージャ及びモジュールへの記述については下記参考にされてください。
参考URL:http://www.asahi-net.or.jp/~ef2o-inue/vba_k/sub0 …
何度も詳しく回答いただきありがとうございます。素人ゆえ理解に二日かかってしまいお礼が遅くなり失礼しました。
また何かありましたら宜しくお願いします。
No.8
- 回答日時:
…度々すみません。
解除用、もうひとつ必要でした。■ThisWorkBookモジュールに
Private Sub Workbook_Deactivate()
Application.OnKey "{TAB}"
End Sub
No.6
- 回答日時:
VBAということなので
シートのイベント・プロシージュアーに
Private Sub Worksheet_Change(ByVal Target As Range)
MoveAfterReturnDirection = xlToRight
If Target.Column = 4 Then
Cells(Target.Row + 1, 1).Select
End If
If Target.Column = 4 And Target.Row = 2 Then
Cells(1, 1).Select
End If
End Sub
でうまくいくようです。セル移動は
TAB
ENTER
→
でもOK。
MoveAfterReturnDirection = xlToRight は用済みのプログラム上の
箇所(質問で言っている入力が終わったとか)で、下方向に戻す必要があるかもしれませんので注意。
No.5
- 回答日時:
申し訳ありません。
No.4レス、凡ミスありました。>[Alt]+[F4]キー
ではなく、[F4]キーのみです。(…終了させてどーする^ ^;)
と、これだけではなんなので、ついでですが、
どうしてもTABキーに拘られる場合、
VBAでApplication.OnKeyを使って[TAB]キーにマクロを割り当てれば、可能です。
その場合、WorksheetやThisWorkbookのイベントマクロを使う形になります。
具体的なサンプルを提示したほうがいいでしょうか?
No.4
- 回答日時:
こんにちは。
順番は
>A1→A2→A3→A4→B1→B2→B3→B4
なのでしょうか?
シートの保護をかけた場合でも、TABキーだとA1→B1→A2・・・と移動します。
Enterキーでの移動で良ければ、ScrollAreaを設定すればできると思います。
ただ、その場合は画面スクロールもできなくなりますから、それでも良ければ、ですけど。
該当シートタブを右クリック。[コードの表示]でVBEが起動します。
[Alt]+[F4]キーでプロパティウィンドウが表示されます。
ScrollArea の欄右側に A1:B4 と入力。です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルの関数式を教えてください。 2 2022/11/29 21:09
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 1 2023/02/27 22:21
- Excel(エクセル) エクセルのマクロについて教えてください。 3 2023/02/07 14:47
- Excel(エクセル) エクセルで、特定のセルの内容を更新すると、別の特定セルに 更新日付が自動的に表示させる方法はあります 1 2022/11/14 21:03
- Excel(エクセル) エクセルを活用した受注表作成の中で関数・数式を教えてください。 3 2022/07/23 08:14
- Excel(エクセル) エクセルの質問です 3 2023/07/16 17:33
- Visual Basic(VBA) vbaエクセルマクロ RemoveDuplicatesについて RemoveDuplicatesを使 3 2023/02/28 01:13
- Excel(エクセル) ユーザー定義について質問です。 2 2023/06/28 13:21
- Excel(エクセル) エクセルのセル値に対応してマクロを実行する方法を教えてください セルA1が「1」の時にマクロ名「マク 2 2022/06/19 18:45
- Excel(エクセル) エクセルVBA 複数行にまたがっている選択を判定するには 2 2023/05/21 21:54
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Excel VBA あるセルでENTERを押すと特定のセルへ移動したい
Excel(エクセル)
-
タブキー押下時のイベントをひろいたい。
Visual Basic(VBA)
-
エクセルのVBA 特定のセルでエンターキーでマクロ実行
Excel(エクセル)
-
-
4
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
5
VBAで、なぜかSendkeyが効きません。
PowerPoint(パワーポイント)
-
6
コマンドボタンのEnterイベント後に、フォーカスを移動したい。
その他(Microsoft Office)
-
7
エクセルVBA テキストボックスに3桁ごとにコンマ
Visual Basic(VBA)
-
8
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
9
テキストボックスの番号を使ったFor~Next文について
Visual Basic(VBA)
-
10
エクセルVBA テキストボックスへのセットフォーカスについて
Visual Basic(VBA)
-
11
VBA エンターキーでイベントに入りたい。
PowerPoint(パワーポイント)
-
12
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
13
Userformの入力順序をタブオーダーでなく、VBAで指定したい。
Visual Basic(VBA)
-
14
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
15
VBAでユーザーフォームを再表示させたい。
Excel(エクセル)
-
16
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
17
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
18
VBA:ユーザーフォームのマルチページに色を付けたい。
Word(ワード)
-
19
Excelマクロ、フォーム入力での矢印移動禁止
Excel(エクセル)
-
20
Offsetで可視セルだけを移動したい。
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
プラス(足す)キーはどうやっ...
-
キーボードがCtrlキーが押され...
-
「か」を数字で表すとどうなり...
-
Scroll Lockが勝手に有効になる...
-
あさぎーにょちゃんの『別の人...
-
Access2010 Enterで次テキスト...
-
メールアドレスの作成の際上バ...
-
パソコンの青い線枠が消えませ...
-
「(アクサングラーブ)キー」と...
-
ノートパソコンのキーキャップ...
-
Ctrlキー+HomeキーでセルA1へ移...
-
プーリーのキーが外れない
-
PDF-XChange Viewer 全画面表示...
-
batファイルで結果を表示しない...
-
PgDn、PgUpの設定が急に変わっ...
-
エクセルで複数行に散らばった...
-
Tabキーが右側にないのは
-
矢印キーのロック解除方法
-
IMEパッドがショートカットキー...
-
Shiftキーのはめ方を教えてくだ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
プラス(足す)キーはどうやっ...
-
キーボードがCtrlキーが押され...
-
Scroll Lockが勝手に有効になる...
-
矢印キーのロック解除方法
-
メールアドレスの作成の際上バ...
-
Ctrlキー+HomeキーでセルA1へ移...
-
パソコンの青い線枠が消えませ...
-
PgDn、PgUpの設定が急に変わっ...
-
「か」を数字で表すとどうなり...
-
プーリーのキーが外れない
-
(word) 文字列の上に線を引く方法
-
VSCodeで上書きモードにならない
-
「(アクサングラーブ)キー」と...
-
Shiftキーのはめ方を教えてくだ...
-
東京晴海に謎のキーボックスが...
-
ノートPC起動中のエラーメッセ...
-
Access2010 Enterで次テキスト...
-
エクセルで複数行に散らばった...
-
IMEパッドがショートカットキー...
-
PDF-XChange Viewer 全画面表示...
おすすめ情報