VBAのコードについてです

Question

VBA初心者です。
Private Sub CommandButton11_Click()

MultiPage1.Value = 1
CommandButton11.Accelerator = "T"

というのは、どういうことなんでしょうか？
調べてみたものの、いまいちわからなくて。。。お願いします

Answer 1

既に理解されたかもわかりませんが回答します。

' このプログラムが属するフォーム(画面)にて、
' 「CommandButton11」がクリックされた際に
' 以下のプログラムを実行する(End Subの前までの処理を実行)
Private Sub CommandButton11_Click()

    ' マルチページ(タブがある部分)にて一番左の要素をアクティブにする
    MultiPage1.Value = 1
    
    ' 「CommandButton11」を押下する処理のショートカットキーに
    ' 「T」を割り当てる。
    ' この場合、このプログラムが属するフォーム(画面)にて
    ' 「Alt + T」 を押下した場合、
    ' 「CommandButton11」がクリックされた時と同等の処理が実行される
    CommandButton11.Accelerator = "T"

End Sub

Answer 2

詳しいコードを全部見たわけではないので全てはわかりませんが、「Accelerator」が使われているところを見ると、Alt+「T」とキーをおすことで何かを実行するものではないでしょうか？

また表示としては「CommandButton11」に設定されているボタンに表示されている「T」におそらく下線が引かれているはずです。

参考としては以下のURLあたりが詳しいAcceleratorの説明になるかと思います。

アクセスキーの設定

Comments

[koarakko]

細かく教えていただいてありがとうございますm(_ _)m