Set a combo box to an entry and clear it of everything

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

XP - 28 Jan 2007 15:36 GMT

Using Office 2003 and Windows XP; using VBA, how can I:

1) Programmatically set a combo box to a particular entry in the drop down
list?

2) Clear the combo box drop down list of all entries?

If possible, please post generic VBA example code.

Thanks a lot in advance.

Reply to this Message

Rick Brandt - 28 Jan 2007 15:50 GMT

> Using Office 2003 and Windows XP; using VBA, how can I:
>
> 1) Programmatically set a combo box to a particular entry in the drop down
> list?

Me!ComboBoxName = SomeValue

SomeValue would need quotes around it if it was a Text value.

> 2) Clear the combo box drop down list of all entries?

Don't understand what you mean by "entries". A ComboBox can have only one
"selection" so I must assume you want all of the choices in the list removed?
In that case just set the RowSource property to "".

Me!ComboBoxName.RowSource = ""

Signature

Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com

Reply to this Message

XP - 28 Jan 2007 16:42 GMT

Hi and thanks Rick.

When I run this code from a standard code module:

Forms(gcsFormMainMenu).Controls("cboMainDept1") = 0

It sets the value of the drop down to zero rather than the first item in the
drop down list. How can I make that work?

Thanks again.

> > Using Office 2003 and Windows XP; using VBA, how can I:
> >
[quoted text clipped - 12 lines]
>
> Me!ComboBoxName.RowSource = ""

Reply to this Message

Rick Brandt - 28 Jan 2007 16:52 GMT

> Hi and thanks Rick.
>
[quoted text clipped - 4 lines]
> It sets the value of the drop down to zero rather than the first item in the
> drop down list. How can I make that work?

Well, that is not what you asked for :-)

If the bound column of the ComboBox is the first one...

Forms(gcsFormMainMenu).Controls("cboMainDept1") =
Forms(gcsFormMainMenu).Controls("cboMainDept1").Column(0,0)

If the bound column is not the first column then the first zero would be changed
to 1 for the second column, 2 for the third, etc.. The second zero would not be
changed as that specifies the first row.

Signature

Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com

Reply to this Message

XP - 28 Jan 2007 17:16 GMT

> > Hi and thanks Rick.
> >
[quoted text clipped - 6 lines]
>
> Well, that is not what you asked for :-)

YEAH, I know; things changed as I was developing. This is sort of a follow
up...

> If the bound column of the ComboBox is the first one...
>
[quoted text clipped - 4 lines]
> to 1 for the second column, 2 for the third, etc.. The second zero would not be
> changed as that specifies the first row.

WORKS great thanks!

Reply to this Message