No.1ベストアンサー
- 回答日時:
Access VBAでは、Tabキーを押したときのカーソルの移動幅を変更するために、以下の手順をお試しください。
Visual Basicエディタを開きます。
モジュールを選択し、コードを編集します。
カーソルの移動幅を変更するためのコードを追加します。
以下に、カーソル移動幅を変更する例を示します。
vba
Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer
Sub ChangeTabWidth()
' Tabキーを押したときのカーソル移動幅を変更する
Const VK_TAB As Long = &H9
Const GWL_WNDPROC As Long = -4
Const WM_KEYDOWN As Long = &H100
Const WM_GETDLGCODE As Long = &H87
Dim hWnd As Long
Dim PrevWndProc As Long
' カーソル移動幅を設定する値(ピクセル単位)
Dim tabWidth As Integer
tabWidth = 20 ' 例として20ピクセルに設定
' 現在のウィンドウプロシージャを取得
hWnd = Application.hWndAccessApp
PrevWndProc = GetWindowLong(hWnd, GWL_WNDPROC)
' ウィンドウプロシージャを変更
SetWindowLong hWnd, GWL_WNDPROC, AddressOf NewWndProc
' ウィンドウプロシージャの新しい定義
Function NewWndProc(ByVal hWnd As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Select Case uMsg
Case WM_KEYDOWN
If wParam = VK_TAB Then
' カーソル移動幅を設定
SendMessage hWnd, WM_GETDLGCODE, 0, ByVal 0&
SetCursorPos(tabWidth, 0)
NewWndProc = 1
Else
NewWndProc = CallWindowProc(PrevWndProc, hWnd, uMsg, wParam, lParam)
End If
Case Else
NewWndProc = CallWindowProc(PrevWndProc, hWnd, uMsg, wParam, lParam)
End Select
End Function
End Sub
上記のコードでは、ChangeTabWidthというサブルーチンを定義し、Tabキーが押されたときにカーソルの移動幅を変更します。tabWidthの値を適宜調整してください。
このコードを実行すると、Tabキーを押したときのカーソル移動幅が設定した値に変更されるはずです。
この方法はAccessのウィンドウプロシージャを変更することで実現しており、他の動作にも影響を与える可能性があります。
注意して使用してください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(プログラミング・Web制作) iMacのシェル内カーソル移動 1 2022/06/15 17:27
- Windows 10 Windows11タスクバーやエクスプローラー、スタートメニュー 動画全画面時にカーソルが見えない 1 2022/04/08 00:03
- Excel(エクセル) Excelで、カーソルの移動が異常です。 1 2022/06/15 20:54
- Chrome(クローム) ブラウザgooglechromeの改修。改悪じゃないの? 6 2024/01/02 17:27
- マウス・キーボード scroll Lockキーを解除したけれど。 1 2022/09/16 09:23
- Excel(エクセル) 右矢印を押すと画面全体が移動します。 2 2023/06/19 08:12
- Windows 10 Windows10でAltキーを押しながらTabキーを1回だけ押して画面を切り替える際、ちらつき防止 3 2023/12/12 13:52
- Visual Basic(VBA) VBA 画面上のカーソルに文字数字を入力するコードを教えて下さい 1 2022/10/30 10:31
- マウス・キーボード テンキーの設定がおかしくなっています。 5 2023/08/09 15:35
- Chrome(クローム) Chrome ブラウザでショートカット(tab)を無効にしたい。 1 2023/11/05 22:26
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
Gitについて質問。 クローンしたフォルダをコピーして、色々書き換えて、 さらにクローンして、そこに
その他(プログラミング・Web制作)
-
Notepad++の関数リスト表示の変更方法をお教えください。
C言語・C++・C#
-
Excel2010で、今の、Excel2021 365のように、関数増やす機能ないですかね?追加で。
Excel(エクセル)
-
-
4
Webプログラムってネイティブアプリプログラムに比べて遥かに簡単すぎる気がするのですが気の所為ですか
その他(プログラミング・Web制作)
-
5
pythonで複数画像からgifを作る方法
その他(プログラミング・Web制作)
-
6
txtってパソコンでも横書きに表示されるんですよね?
Word(ワード)
-
7
WinSCPをフォルダに入れる方法を教えてください。
Windows 10
-
8
csvファイルをlinuxコマンドで、元々重複していないレコードだけにしたいです。
教育ソフト・学習ソフト
-
9
mallocについて
C言語・C++・C#
-
10
入社説明会の時に、スーツで電車乗るとすごくみられるのはなぜですか?18歳女です。
就職
-
11
C言語をコンパイルするとコンピュータ上でどう動くかというコードになるみたいな説明をよく聞くのですがこ
C言語・C++・C#
-
12
Excel:一部のフォントでセルの数字がはみ出る
Excel(エクセル)
-
13
ネットワークトラブル監視ソフト(orコマンド)はありますか(できれば無料)?
ネットワーク
-
14
数学 Tan(θ)-1/Cos(θ)について教えてください
Excel(エクセル)
-
15
Pythonって何を意識した言語なんですか?コマンドライン?
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ノートパソコンの指でさわる部...
-
ノートパソコンの画面の矢印が...
-
ノートパソコンの不具合につい...
-
テキストボックス内でのカーソ...
-
セルを示す四角のカーソル色の...
-
十字カーソルの輪郭が見えない
-
Excelで、カーソルの移動が異常...
-
Wordのページが飛ぶ
-
ノートパソコンがマウスもタッ...
-
カーソルが勝手に
-
PCのカーソルが意図しないとこ...
-
VBA 画面上のカーソルに文字数...
-
Mac対応の連打ソフトについて
-
Excelです。カーソルの上のとこ...
-
Accessで Tabキーを押したとき...
-
マウスを推薦願います。
-
エクセルのセルをドラッグしな...
-
マウスのカーソルは飛ぶ事があ...
-
カーソルが勝手に下に暴走し、...
-
logicoolの「DPI感度レベル」っ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ノートパソコンの指でさわる部...
-
ディスクトップアイコンの大き...
-
Wordのページが飛ぶ
-
スターウォーズバトルフロントⅡ...
-
ノートパソコンがマウスもタッ...
-
セルを示す四角のカーソル色の...
-
マウスを推薦願います。
-
エクセルのセルをドラッグしな...
-
テキストボックス内でのカーソ...
-
Wordのカーソルの位置について
-
Excelで、カーソルの移動が異常...
-
キーボードを押しながらタッチ...
-
photoshopで謎のマーク
-
カーソルが勝手に下に暴走し、...
-
「.cur」のアイコン表示について
-
Excel2007 テキストボックス内...
-
Accessで Tabキーを押したとき...
-
ノートパソコンのタッチパッド...
-
ノートパソコンの画面の矢印が...
-
マウスのカーソルは飛ぶ事があ...
おすすめ情報