Using XL 2000, i'm populating a combobox using:

With Month
.AddItem "January" '0
.AddItem "February" '1
.AddItem "March" '2
.AddItem "April" '3
.AddItem "May" '4
.AddItem "June" '5
.AddItem "July" '6
.AddItem "August" '7
.AddItem "September" '8
.AddItem "October" '9
.AddItem "November" '10
.AddItem "December" '11
End With

I would like the current month to default in the combobx.
any ideas appreciated.

Thanks, Paul