Search results

Its all about the form actually, not to set it for report. Using this code i am setting form dynamically. Me.mySubForm.SourceObject = "qry_TSYSCountryCodesTmp"

Subform/Subreport using design view.

Single Form I am using

As you see the snap shot I have to make totally dynamically showing the forms based on user search. So I will have more than 6 Text Fields for user to search and as per user input I would like to show relevant form.

Sorry for not clearing the things. I have about 10 forms so based on the user search I would like to show form data on SubForm/SubReport Control box. I want to make CountryName Field in a Form to grow Automatically based on the contents in the form field.

Hi, I trying to add report to subform/subreport based on user choice and button click. The issue I am facing that the text field doesn't grow according to the data in a field. Please suggest how to set Form field grow (not report) automatically. thanks

Yes, CountryName and CountryCode2 are the table fields of same table. Expr1: InStr([CountryName] & [CountryCode2],[Forms]![Main]![txtSearch])

Thanks Man, I changed code accordingly and it works Expr1: InStr([CountryName] & [CountryCode2],[Forms]![Main]![txtSearch])

Hi, I am wondering If I could get solution that how to show all rows where keywords are matching in 2 or more columns of a table. I am using this for one field and working well but don't know how to use for two columns. Expr1: InStr(1,[CountryName],[Forms]![Main]![txtSearch]) thanks

Thanks for all to reply me on this. using application.enableevent=false and then true works fine.

I tried on single cell not on merged one but no luck. The target value I am looking for is in column Q so when I click on the cell of column Q program should check the cell value and do action accordingly.

After changing to Target it thronging error "Error 13" Type mismatch. and highlight the "If Target.Value = "Add to Orders List" Then"

I am trying to delete record but getting error while clicking on cell . Code added on Sheet2: Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Intersect(ActiveCell, Range("q:q")) Is Nothing Then If ActiveCell.Value = "Add to Orders List" Then rowNum =...

any suggestion from your side as i would like to design POS retail system. so approach is good as I also want to learn.

I would like to learn about how to deal using unbound and all to deal using vba. I have made field txtCID and it showing the results.

Hi, I am wondering about a small issue which I am facing to get the ID from a table using Function call. It is working perfectly on my other MS Access program but not on the currently attached. If you open frm_Customers and hit show button you will see it giving error Object required. Can any...

I am not expert in MS Access Design and development so I Used a drop-down that take style type from saved_style table and using dlookup to apply the whole records to new records. This working good for me.

Ok, Suppose I would like to apply Style A (means all fields information)to Piece no 1,2,3,4,5 how can I do it?

have you pleased gave a look on db attached?

Please give a look on the sample database. an single order might have many pieces of shirts and many pieces might be with same styleType. I would like to apply the same shirt style to other pieces on a click. That why I created same structured table to copy the style from and update...