Add "ALL" to combo box

[tombev]

How do I add "ALL" (as the top choicce) in a drop down combo box in Access? (combo box only has one field)

[missinglinq]

Replace your combobox RowSource with this

SELECT YourField FROM YourTable
UNION SELECT "<All>" FROM YourTable; 

filling in your actual field and table names.

Then use this code in the AfterUpdate of your combobox, once again filling in the actual name of your combobox:

Private Sub YourCombobox_AfterUpdate()
  If Me.YourCombobox = "<All>" Then 
    'Place code here to address selction of <All> 
  End If
End Sub

Welcome to TheScripts!

Linq ;0)>

[puppydogbuddy]

How do I add "ALL" (as the top choicce) in a drop down combo box in Access? (combo box only has one field)

To add All in the droplist of an unbound combobox, replace the RowSource property of the combobox with the following SQL string, replacing "yourComboColumn with the actual column name in your application.:

SELECT YourComboColumn As Filter, YourComboColumn FROM YourTable
UNION SELECT "*" As Filter ," All" As YourComboColumn FROM YourTable
ORDER BY YourComboColumn;
 

The union query will generate 2 columns, the first is to be used as the bound (hidden) column, and the second will be used as the displayed column.so be sure and set these properties for your combobox:
Columns = 2
Bound Column = 1
Column Widths - 0; 2

Note the space before the letter A in " All".....this is designed so that All will sort as the top choice.in the collation sequence.

---Example-------------
SELECT City AS Filter, City FROM tbl_Customers
UNION SELECT '*' AS Filter, "All" AS City FROM tbl_Customers

As a final step, you can set the default value property for the combobox to: * and it will default the combo selection to all if nothing is selected.

[tombev]

Maybe I should mention couple other things--- 1) My combo box is named: cboLEC2; 2) The bound column is: 1; 3) It uses a TAG function; 4) This is the RowSource I currently have: SELECT StatusSheetInfo.LEC FROM StatusSheetInfo GROUP BY StatusSheetInfo.LEC ORDER BY StatusSheetInfo.LEC;

[puppydogbuddy]

Maybe I should mention couple other things--- 1) My combo box is named: cboLEC2; 2) The bound column is: 1; 3) It uses a TAG function; 4) This is the RowSource I currently have: SELECT StatusSheetInfo.LEC FROM StatusSheetInfo GROUP BY StatusSheetInfo.LEC ORDER BY StatusSheetInfo.LEC;

Here is the way the row source should look if you followed the instructions that I provided you above:

SELECT LEC As Filter, LEC FROM StatusSheetInfo 
UNION SELECT "*" As Filter ," All" As LEC FROM StatusSheetInfo
GROUP BY StatusSheetInfo.LEC ORDER BY StatusSheetInfo.LEC;

Follow the rest of the instructions above and it should work.

[Venkatesh Kalya]

well this is working i would like to know how to filter the data based on the four combobox and rowsource too