Changing Range in Forms Drop Down Without Selecting
 

Hello.

I'm trying to change the range in a drop down box without selecting the
object, but I'm having difficulty doing this.

Excel keeps the object selected even after you select a different cell.
(I know I encountered this problem a while back, but forgot the
resolution.)

Part of this is because I'm using another forms object to call the
procedure. If I run this on its own it usually doesn't have the same
problem.

Right now I have:

Private Sub QueueButton_Click()
Range("A3").Value = "Queue Type"
Rows("4:11").EntireRow.Hidden = False
Rows("12:20").EntireRow.Hidden = True

ActiveSheet.Shapes("Drop Down 2").Select
With Selection
.ListFillRange = "AccessPoint!$N$2:$N$9"
.DropDownLines = 8
End With
Range("C1").Select
End Sub

Any help here would be greatly appreciated.

Thanks.

Dan

*** Sent via Developersdex http://www.developersdex.com ***