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も見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
変数名をどのようにつけるのが良いかアドバイスお願い致します
JavaScript
-
Notepad++の関数リスト表示の変更方法をお教えください。
C言語・C++・C#
-
Excel2010で、今の、Excel2021 365のように、関数増やす機能ないですかね?追加で。
Excel(エクセル)
-
-
4
txtってパソコンでも横書きに表示されるんですよね?
Word(ワード)
-
5
Webプログラムってネイティブアプリプログラムに比べて遥かに簡単すぎる気がするのですが気の所為ですか
その他(プログラミング・Web制作)
-
6
Gitについて質問。 クローンしたフォルダをコピーして、色々書き換えて、 さらにクローンして、そこに
その他(プログラミング・Web制作)
-
7
QRコード運用方法について詳しい方ご教授頂きたいです
その他(開発・運用・管理)
-
8
csvファイルをlinuxコマンドで、元々重複していないレコードだけにしたいです。
教育ソフト・学習ソフト
-
9
WinSCPをフォルダに入れる方法を教えてください。
Windows 10
-
10
入社説明会の時に、スーツで電車乗るとすごくみられるのはなぜですか?18歳女です。
就職
-
11
ノーコードツールについて
ソフトウェア
-
12
Excel:一部のフォントでセルの数字がはみ出る
Excel(エクセル)
-
13
mallocについて
C言語・C++・C#
-
14
ネットワークトラブル監視ソフト(orコマンド)はありますか(できれば無料)?
ネットワーク
-
15
数学 Tan(θ)-1/Cos(θ)について教えてください
Excel(エクセル)
-
16
C言語をコンパイルするとコンピュータ上でどう動くかというコードになるみたいな説明をよく聞くのですがこ
C言語・C++・C#
-
17
PDFを送って貰う言い方
PDF
-
18
Pythonって何を意識した言語なんですか?コマンドライン?
その他(プログラミング・Web制作)
-
19
ディスククリーンアップが終わらない。
Windows 10
-
20
pythonで複数画像からgifを作る方法
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ノートパソコンの指でさわる部...
-
ノートパソコンがマウスもタッ...
-
Wordのページが飛ぶ
-
テキストボックス内でのカーソ...
-
Excelです。カーソルの上のとこ...
-
(Wordやワードパッドで)カー...
-
スクロールでビープ音が鳴るよ...
-
スターウォーズバトルフロントⅡ...
-
セルを示す四角のカーソル色の...
-
トラックボールマウスのコツ
-
キーボードを押しながらタッチ...
-
エクセルのセルをドラッグしな...
-
マウスのカーソルは飛ぶ事があ...
-
右矢印を押すと画面全体が移動...
-
高負荷時にマウスが引っかかる
-
Accessで Tabキーを押したとき...
-
一太郎でカーソルを次の行の先...
-
カーソルが勝手に下に暴走し、...
-
logicoolの「DPI感度レベル」っ...
-
Excel2007 テキストボックス内...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ノートパソコンの指でさわる部...
-
スターウォーズバトルフロントⅡ...
-
セルを示す四角のカーソル色の...
-
Wordのカーソルの位置について
-
Wordのページが飛ぶ
-
エクセルのセルをドラッグしな...
-
photoshopで謎のマーク
-
Excelで、カーソルの移動が異常...
-
テキストボックス内でのカーソ...
-
カーソルが勝手に下に暴走し、...
-
ディスクトップアイコンの大き...
-
ノートパソコンがマウスもタッ...
-
Excel2007 テキストボックス内...
-
logicoolの「DPI感度レベル」っ...
-
ノートパソコンの画面の矢印が...
-
十字カーソルの輪郭が見えない
-
キーボードを押しながらタッチ...
-
マウスのカーソルは飛ぶ事があ...
-
ポインターとカーソルは同じ意味?
-
カーソルが表示されないので助...
おすすめ情報