Excel 97 Combo Box problem

[Roper7]

I've created a dropdown combo box in Excel 97 that is
populated with items that refer to named ranges on my
worksheet. I want my users to be able to select an option
and be taken to the named range. I populated the box
using the AddItem method, but I can't get the code to work
when they make a selection. Based on info from Help, I am
using the GoTo method with a Select Case. This is the
code I've written:

Private Sub cboProvList_change()

Select Case providers
Case "Medical Provider 1"
Application.Goto Reference:=Range("mdprov1&quot,
Scroll:=True
Case "Medical Provider 2"
Application.Goto Reference:=Range("mdprov2&quot,
Scroll:=True
Case "Medical Provider 3"
Application.Goto Reference:=Range("mdprov3&quot,
Scroll:=True
Case "Dental Provider 1"
Application.Goto Reference:=Range("dnprov1&quot,
Scroll:=True
Case "Dental Provider 2"
Application.Goto Reference:=Range("dnprov2&quot,
Scroll:=True
Case "Vision Provider 1"
Range("vpprov1&quot.Select
Application.Goto Reference:=Range("vpprov1&quot,
Scroll:=True
Case "Vision Provider 2"
Application.Goto Reference:=Range("vpprov2&quot,
Scroll:=True
End Select
End Sub

What am I doing wrong? Any help would be appreciated.

Lee

 

[jflo]

I would use "MsgBox providers" to see what you have in providers and then fix the case accordingly.

JFLo

 

[Databaseguy]

Your code works, I'd put it in the double click event instead of change.... Tyrone Lumley
augerinn@gte.net

http://server47.hypermart.net/databaseguy