Drop Down text won't change

[The ants are driving me crazy]

OK, I used this simple routine to select an item in the "Plan" drop
down box. My problem is that this text will not go away once I select
another item in the drop down. Using the Value property I was able to
verify that the selected item did change, but the drop down box still
says "Plan1". Any tips on what to do about this?

Note, The drop down box text did change until I ran the routine listed
below.

Thanks

Chris


Sub test()

ActiveSheet.DropDowns("Plan").Text = "Plan1"

End Sub