Combo Box Event

[dmcgimpsey]

Hi Folks

I have a combo box, that has a list of selection items.

I have the VBA code set up to send the user to a website based on the selection they make - as follows;

Private Sub ComboBox1_Change()
Dim hlink As String
hlink = ComboBox1.Value
hlink = "C:\Model Vision\html\m" & hlink & ".htm"
If Dir$(hlink) <> "" Then
' ActiveWorkbook.FollowHyperlink Address:=hlink, NewWindow:=True
Shell "C:\WINDOWS\hh.exe " & hlink, vbMaximizedFocus
Else: MsgBox ("File Not Found, Please Try Again")
End If
End Sub


Problem:

I want the user to be able to any value, but as soon as they type a character, the program goes off and tries to display a page. I could be using the wrong event, is there an "Enter" event or a "Select" event ?

Thanks

Don

 

[Greg Truby]

Looks to me like the best event to use in this case would be the LostFocus event.