Assigning combo box value based on Environ("UserName")

[MTSPEER]

Hello,



What I want to do is when a person opens the form(frmRep) it will autopopulate my combobox(cmboRepresentative) with the first name of the person using it. I have made a table(tbl_Users) that has the persons Username and first name and other information on it. The first name field is called "First_Name". The row source of the of the combo box already has a query with all the reps names. I am trying to figure out the best way when the user logs on I can link the Environ("UserName") property to my table and assign the combo box with the first name.

Thank you

[ranman256]

the combo box must have 2 columns, the UserID, and UserName
set the combo box bound col = UserID
set the #columns = 2
set the col Widths = 0;2 (this hides the userid)

when you assign the userid, cboBox = Environ("UserName")
the combo box STORES the userid
but SHOWS the name.

[MTSPEER]

I can't set the combobox Control Source to UserID this form is bound to another table. This is a different table that has the UserID and UserName

[ranman256]

yes, the tUser table FEEDS the field in your data table. (hence the combo box)

[June7]

What field is the combobox bound to? Are you saving UserID as foreign key into this field? And if not, why not?

Set Value of combobox to the UserID with a DLookup().

Me.cmboRepresentative = DLookup("UserID", "tbl_Users", "UserName='" & Environ("USERNAME") & "'")

[MTSPEER]

The combo box isn't bound. SO keep the row source blank? I tried that Dlookup function and it doesn't return anything

[June7]

What is purpose of combobox? If not data entry, selecting criteria for filtering records?

I also tried Ranman's suggestion. Doesn't work either if combobox is unbound and has alias lookup.

Code actually gets more complicated. After setting Value of combobox, 'go to' the relevant row:

Forms!frmRep!cmboRepresentative.Selected(1) = True

Also works with listbox.

So what are your combobox settings:

ControlSource: you already said is unbound
BoundColumn: ?
RowSource: ?
ColumnCount: ?
ColumnWidths: ?

[MTSPEER]

I just have my row source set to a query which is made from tblUsers which has the First_Name field and username field. And I just put my column count to 1.

[June7]

Then instead of UserID in the DLookup, use First_Name.