我想方便地使用 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