Requery Listbox with value from Combobox loses format (1 Viewer)

rpfisher

New member
Local time
Today, 12:55
Joined
Jan 27, 2015
Messages
5
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.

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!
 

rpfisher

New member
Local time
Today, 12:55
Joined
Jan 27, 2015
Messages
5
hey thanks for the reply, qry_inv_form is the query where the listbox and combobox get their values from.
 

Users who are viewing this thread

Top Bottom