Prev: Lookup...
Next: Data Entry
From: Al Campagna on 8 Feb 2010 19:41 Steve, It's Monday evening 7:30 PM US Eastern time. I sent your file back to you, at 10:45 AM this morning, using the email address I received from you. That email also contained the text response I copied onto this thread. (see above) The text explanation of what I found is the most important, but I would like to return your file to you, or at least be able to communicate further with you, as necessary. The problem... I continue to get messages that that email still has not been delivered, that the system will continue to try to deliver same. Al Campagna "Steve Muir" <SteveMuir(a)discussions.microsoft.com> wrote in message news:A3123D39-9021-456D-A457-C2E87675E965(a)microsoft.com... > Hi, > > Thanks for the quick response but it's not quite what I'm after. After > reading my post I did not explain myself very well at all!! > > I have the combobox rowsource set up to SELECT DISTINCT Suppliername from > tblSupplier (to give the user a list of current supplier names to select > from) And I have the number of columns etc exactly as you suggested. The > problem comes when the VBA code tries to insert the data on the form > fields > into the Contracts table (Parent Table). The "actual" value (as seen on > the > form) is the Supplier Name (not the corresponding SupplierID (PK)) But > when > the code tries to insert the data into the parent table (tblContracts) it > is > trying to insert the Text value from the textbox, rather than the > SupplierID > numerical value needed for the numerical field value in tblContracts (the > parent table) > > Hope this makes sense, I might be better off attaching the form itself to > illustrate what I mean. > > > "Al Campagna" wrote: > >> Steve, >> Given cboSupplierID with SupplierID in the first column, and >> SupplierName in the second column. >> Setup your combobox like this... >> No Of Columns = 2 >> Column Widths = 0" ; 1.5" >> >> This allows the user to only see the SupplierName, select a >> SupplierName, but >> set the value of cboSuppplierID to the SupplierID. I think that's what >> you >> want... >> (usually, the cboSupplierID would be "bound" to your SupplierID table >> field) >> >> On my website (below) I have a sample A97 and A2003 zip file named >> Combo Quick Find, which demonstrates the above method. >> -- >> hth >> Al Campagna >> Microsoft Access MVP 2006-2009 >> http://home.comcast.net/~cccsolutions/index.html >> >> "Find a job that you love... and you'll never work a day in your >> life." >> >> "Steve Muir" <SteveMuir(a)discussions.microsoft.com> wrote in message >> news:2FDDB0F7-8FA7-4594-B8AD-E157FE48A45F(a)microsoft.com... >> > Bit of a "noob" question but here goes.... >> > >> > I am using an unbound form for data entry purposes. I am using an >> > unbound >> > form as I have some VBA code which checks that mandatory fields are >> > filled >> > in >> > first. >> > >> > This works fine where all the fields are text boxes (i.e. not combos or >> > list >> > boxes) >> > but the problem I'm having is that the parent table "tblContracts" has >> > 4 >> > lookup tables (which are used for combos with various fields on the >> > form) >> > and >> > these are numeric fields which link between the tables (i.e. In the >> > parent >> > table the field would be SupplierID whick links to the child table >> > SupplierID >> > field) In the form obviously it displays the actual name rather than >> > the >> > index numerical value when the user clicks the dropdown menu. The >> > issue >> > (I >> > think?) is that the VBA code I have is trying to insert a numerical >> > value >> > (The ID field value) rather than the text which is displayed in the >> > dropdown >> > menu. How can I get round this?? >> > >> > Apologies if this seems really simple but I have limited VBA coding >> > experience. The >> > >> > PS - VBA code to insert data to the table works perfectly if the table >> > has >> > no lookup values in the combo boxes. >> > >> > These ar >> > >> > When I click the command button to insert the data from the form into >> > the >> > table >> >> >> . >> |