Comboboxes embedded in a worksheet

Hello.

I`ve got quite a few comboboxes on a worksheet and would like to fill them all with the same selection values. How can I do this without having the code go like this

With combo1
.additem "value 1"
.additem "value 2"
etc
end with

With combo2
.additem "value 1"
.additem "value 2"
etc
end with

with combo3
.additem "value 1"

and so on

If you could help then this would save me a load of time.

Many thanks

James, (I`ve trying to do this all day)