Hi Guys
Only my 2nd post i'm afraid, but I'm getting there - usually find all the answers I need in other posts, but haven't found an answer to this one yet...
I have a listbox on a form with several fields, 3 of which are currency fields.
When I filter the listbox using afterupdate from a combobox on the same form, the listbox loses the currency format on the fields.
I tried wrapping the fields in Format(fieldname, "Currency") but that came back with a syntax error.
Any help would be greatly appreciated!
Only my 2nd post i'm afraid, but I'm getting there - usually find all the answers I need in other posts, but haven't found an answer to this one yet...
I have a listbox on a form with several fields, 3 of which are currency fields.
When I filter the listbox using afterupdate from a combobox on the same form, the listbox loses the currency format on the fields.
Code:
cboprop_AfterUpdate()
Dim ListFilter As String
ListFilter = "SELECT [qry_inv_form].[inv_no], [qry_inv_form].[prop_ref], [qry_inv_form].[inv_date2], [qry_inv_form].[inv_desc_type], [qry_inv_form].[inv_net], [qry_inv_form].[inv_vat], [qry_inv_form].[inv_total], [qry_inv_form].[year_month], [qry_inv_form].[month_text] " & _
"FROM qry_inv_form " & _
"WHERE [qry_inv_form].[prop_ref] = '" & Me.cboprop & "'"
Me.inv.RowSource = ListFilter
Me.inv.requery
I tried wrapping the fields in Format(fieldname, "Currency") but that came back with a syntax error.
Any help would be greatly appreciated!