Click a Pull-Down with VBA

I have a small macro that establishes a Data Validation pull-down in cell B2

Sub InternalString()
    Range("B2").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="alpha,beta,gamma,delta"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
End Sub

The macro also Selects the cell. I would like to add something to the macro that would "click" on the pull-down, so that once control is returned to the user, they would see:

Any suggestion are welcome.