This is an excerpt of an answer I gave on an Excel VBA mailing list. The original poster asked if I could explain my solution.

Let’s look at a single solution not involving a sub routine call. We’ll use the Combo Box control named CboMonth. Here’s the submitted method with some white space added for us poor human readers. :)

[vb]
With CboMonth

.AddItem “1″
.AddItem “2″
.AddItem “3″
.AddItem “4″
.AddItem “5″
.AddItem “6″
.AddItem “7″
.AddItem “8″
.AddItem “9″
.AddItem “10″
.AddItem “11″
.AddItem “12″

End With
[/vb]
(more…)