saving a form

[Ray67]

Hello



I have a main form which my user enter data. One of the fields is a combo box which is set to limit to list. I also set up a form for the combo box, so user can add new data. I would like for my user to be able to open combo box form from the main form and add new data, than close it and when the user goes to the combo box on the main form the data would be there.


Thank you

[alansidman]

Here is code attached to a command button to open another form. In this case the form is named frmVendor. change the name to reflect your form name and also to reflect the name of your command button. Mine is obviously Command21.

Private Sub Command21_Click()
On Error GoTo Err_Command21_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "frmVendor"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Command21_Click:
    Exit Sub
Err_Command21_Click:
    MsgBox Err.Description
    Resume Exit_Command21_Click
 
End Sub

Alternatively, you could use code to reflect not in list event.

Look here for a link to that

http://allenbrowne.com/ser-27.html

Alan

[Ray67]

Thank you very much it worked.

[Ray67]

One more question.
When i try it on a different computer it doesn't work. Why is this??? Both computers have version 2003.

Thank you

[alansidman]

What do you mean it doesn't work? What happens. Which code are you using Mine or Allen Browne's? Same program? Need more information.

[Ray67]

I'm using your code. When i did it on my home computer it works fine and in my job computer too. Now when i go to someone else computer in my job it doesn't work.

[Stingaway]

When you say it doesn't work, what is actually happening? Are you getting an error, does the machine explode, etc, etc?

[Ray67]

Sorry the combo box does open and I'm able to enter the new data. Than I closed the form and go back to the main form then when I go back to the main form and I click on the combo box the new data is not one of the choices. Thanks!

[alansidman]

When you go back to the original form, has it been closed or was it sitting open in the background? If it was sitting open in the background, then it needs to have a refresh or requery statement.

On your maintenance form for updating the combo box, do you close the form with a command button or using the x in the upper right hand corner?


Alan

[Ray67]

When i go back to the original form it's been sitting open in the background. On the maintenance form i close the form with a command button.

[Ray67]

This is the vba that i'm using for the command button:
Private Sub Command7_Click()
On Error GoTo Err_Command7_Click
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Exit_Command7_Click:
Exit Sub

Can i add Forms("myFormName").Requery to requery the form or should i add it to the command button that closes the form .

Thank you

[alansidman]

Try it on the close. I am not sure. I would have to test but you can do it.