Sorting a combo box populated by code

[Sam]

I have an unbound combo box on a form that I want to sort
alpha...

The combo box gets its values On Load like this:

If Len(Form.Filter) > 0 Then
cboFindContact.RowSource = "SELECT [Contacts].
[CustomerID], [Contacts].[CompanyName] FROM [Contacts]
WHERE " & Form.Filter

The bound column is 1, but I would like to sort the values
in Col 2.

I've found a few examples of sorting a list box using a
Sub and using a function to sort an Array, but I can't get
anything to work.

Any help would be appreciated!

Thanks,
Sam

 

[Glen Appleton]

Hi Sam,

Try adding the Order By directive to the SQL statement in the Row Source
property. For example:

cboFindContact.RowSource = "SELECT [Contacts].[CustomerID],
[Contacts].[CompanyName] FROM [Contacts] WHERE " & Form.Filter & " ORDER BY
[Contacts].[CompanyName]"

Hope this helps,
- Glen

 

[Sam]

Glen,

Thank you very much, that did the trick.

Much appreciated,
Sam

-----Original Message-----
Hi Sam,

Try adding the Order By directive to the SQL statement in the Row Source
property. For example:

cboFindContact.RowSource = "SELECT [Contacts]. [CustomerID],
[Contacts].[CompanyName] FROM [Contacts] WHERE " & Form.Filter & " ORDER BY
[Contacts].[CompanyName]"

Hope this helps,
- Glen

I have an unbound combo box on a form that I want to sort
alpha...

The combo box gets its values On Load like this:

If Len(Form.Filter) > 0 Then
cboFindContact.RowSource = "SELECT [Contacts].
[CustomerID], [Contacts].[CompanyName] FROM [Contacts]
WHERE " & Form.Filter

The bound column is 1, but I would like to sort the values
in Col 2.

I've found a few examples of sorting a list box using a
Sub and using a function to sort an Array, but I can't get
anything to work.

Any help would be appreciated!

Thanks,
Sam

.