Only certain fields appearing in lookup

[ryanmce92]

Hi All,



Ive been trying to find the records in my form based on the selection in a combo box and I have been using the following code:

Private Sub cboSupplierName_Change()
tboStreetNo.Value = cboSupplierName.Column(1)
tboAddress1.Value = cboSupplierName.Column(2)
tboAddress2.Value = cboSupplierName.Column(3)
tboCity.Value = cboSupplierName.Column(4)
tboCounty.Value = cboSupplierName.Column(5)
tboCode.Value = cboSupplierName.Column(6)
cboCountry.Value = cboSupplierName.Column(7)
tboName.Value = cboSupplierName.Column(8)
txtNo.Value = cboSupplierName.Column(9)
tboEmail.Value = cboSupplierName.Column(10)
txtDelivery = cboSupplierName.Column(11)
txtQuality.Value = cboSupplierName.Column(12)
txtExp.Value = cboSupplierName.Column(13)
End Sub

I'm not sure why this only shows the street number of the Supplier, so it is only showing the first column, anyone have any ideas as to why this would be happening?. Any help would be greatly appreciated.

[ranman256]

This code is not finding anything, it is storing data.
To filter records,
use AFTERUPDATE() (not cboSupplierName_Change)
to filter name records by

sub cboSupplierName_AFTERUPDATE()
   me.filter = "[name]=' " & cboSuplierName & " ' "
   me.filteron = true
end sub

[ryanmce92]

I want this form to allow users to edit the data as well as view it, if they were to choose a supplier they could change phone number or name, would the code above allow me to do this?.

[ItsMe]

I am going to go out on a limb here and guess your tables are not normalized. You need to define your entities and create relationships between them that support a normalized data structure. If you do not have this you will not be able to create a graphical user interface with forms. If you do not have your Relational Database in order, you will struggle to create an application that users can interact with.

I suggest you take a few minutes to look at this YouTube video and then follow up but researching Normalization Rules for relational databases.
https://www.youtube.com/watch?v=-fQ-bRllhXc

[Missinglinq]

Why are you trying to re-invent the wheel, here? The Combobox Wizard will do this for you, in about minute or two! Here's a quick step-by-step:

If you haven't already done so, create a Form based on your Table, including all the Fields you want displayed.

Then simply:

• Add a Combobox to your Form.
• The Combobox Wizard will pop up
• Select "Find a record based on the value I selected in my combobox."
• From the Table the Form is based on, click on the Field you're searching by (a Field that is unique for each Record) to move it to the right side.
• Hit Next.
• Size the column appropriately.
• Hit Next.
• Name the Combobox something appropriate.
• Hit Finish.
  
  

Now you can drop the Combobox down and scroll down to the item to search by, or you can start to enter the item and the Combobox will "autofill" as you type. Hit <Enter> and the Record will be retrieved.

Linq ;0)>

[June7]

The code is probably setting value of data in record if the controls are bound, which I doubt you want to happen.

Controls used to input filter/search criteria must be UNBOUND. So in addition to missinglinq post, review: http://www.allenbrowne.com/ser-62.html

[Missinglinq]

Consulting Allen Browne is an excellent idea; his website

Allen Browne's Index Page

is always my first stop, if I run into a problem! It's a good idea to bookmark the above URL.

Linq ;0)>