
便宜上、Tab キーを使用して、コンボ ボックスで以下の画像のように時間の値を入力したいのですが、時間を入力すると、[Tab キー] で分を入力すると [Tab キー] でデフォルト値の AM が表示されますが、A キーまたは P キーを押すと、読み取り専用のコンボ ボックス オプションである AM と PM が切り替わり、必要に応じて Tab キーを押してコンボ ボックスに戻ることもできます。
現時点では、Tab キーを押すとコンボ ボックスの後ろのセルに移動します。以下のコードを試しましたが、何も起こりません。これを実装するにはどうすればよいでしょうか?
Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, _
ByVal Shift As Integer)
Select Case KeyCode
Case vbKeyTab
Me.ComboBox1.TopLeftCell.Offset(0, 1).Activate
Case vbKeyReturn
Me.ComboBox1.TopLeftCell.Offset(1, 0).Activate
End Select
End Sub