Search results

I have a main form with a sub form on it. and a subform on that one as well. The subform's subform has accessories and has these fields: qty, price, exprice. With exprice being a calculated field of price x qty. I have a total on the header of this form with this =Sum([ExPrice]) in it's...

Wow, Thank you!! I am marking this thread as solved :)

Ah, I see, thanks again!

Awesome but I have one question - I have multiple search boxes on each form, do I set the variable filterfield in each of the form subs before calling the function? Thanks

MajP, this works perfectly, but it seems if I could understand your comment "Personally I would write one procedure so you do not have to update each and every one" - then I would become a better code writer - I tried your previous code with the "If Not Trim...." but I think it is calling for...

When you say write one procedure , are you referring to adding the functions and subs you are calling for in the previous code you posted? I will try this out, thank you again!

I am still a little new to all of this, are you saying that your code here will replace my code (with the correct field names of course)?

not sure how to post a screen shot.

It has been modified with multiple queries and additional fields on the form, hence the problem. When I added the sub query which has two subqueries in it, the code stop working.

Yes I had a similar problem before just getting it to work, so when I went to find that thread, I accidently posted their.

no

as soon as they enter a non matching search I get the error so no time to do anything.

I had this problem before, when the query is read only the code does not work. As soon as I remove the subquery everything works as it should.

Endless loop then restart. Maybe some error handling for if it is not in the records but I am not sure how to do that.

Here it is: SELECT tblEstimates.EstimateID, tblEstimates.ModelNumber, tblEstimates.Description, tblEstimates.UofM, tblEstimates.Active, tblEstimates.DateModified, tblProductType.ProductType, tblOwner.Owner, tblEstimates.Stock, qryEstimateTotalPrice.Price FROM tblProductType RIGHT JOIN...

ok here's the line causing the error .SelStart = Len(sText) my code so there's no confusion as to which version am using: Private Sub txtModelFilter_Change() Dim sText As String Dim strFilter As String 'On Error GoTo ErrHandler sText = Me!txtModelFilter.Text If...

I had to go back to .text because with .value it won't let me type more than one character.

I don't have to filter after every key stroke but it sure helps on searching model numbers

Ok, Tried this and now I get invalid use of null, still won't work: Private Sub txtModelFilter_Change() Dim sText As String Dim strFilter As String On Error GoTo ErrHandler sText = Me!txtModelFilter.Value 'changed to .Value from .Text If sText <> "" Then strFilter...