主题：[求助]不用鼠标如何打开下拉框？

afterSelChange事件

Dim c As Col = e.Table.Cols(e.NewRange.ColSel)
Select Case c.name
    Case "第二列"
        Sendkeys.Send("{f4}")
End Select