Open Form While Closing Form
Oct 26, 2006
this has to be simple but i can't get it to work...
i have a selection form (frmSelection) with a combo box...the user makes a selection from the combo box and based on that selection another form opens when they click next...i have a Select Case under cmdNext_Click()..here's a sample of what that looks like:
Select Case cboVioCat.Value
Case 1 ' loads frm_vw_lab_all_facility
frm_Name = "frm_vw_lab_all_facility"
DoCmd.OpenForm frm_Name, acNormal
Case 2 ' loads frm_vw_lab_all_other
frm_Name = "frm_vw_lab_all_other"
DoCmd.OpenForm frm_Name, acNormal
Case Else
strMsg = "Please make a selection from the list"
MsgBox strMsg, vbInformation, "Oops!"
End Select
now what i'd like to happen is say the user selects the first option "Case 1", the new form opens...this works perfectly...but what i'd also like to happen is frmSelection to close - it is no longer needed...i have added DoCmd.Close within each Case and after the End Select but none work...it appears as though it is closing the new form, frm_vw_lab_all_facility...what am i missing here?
View Replies
ADVERTISEMENT
Dec 17, 2004
Is there a way to close a form that is open from another form that has the focus. I tried using the Unload event, but I received an error message "Cant load or unload the object". I would appreciate any help!
View 1 Replies
View Related
Mar 14, 2013
I am using Access 2010 - Version 14.0.61.29.5000 (32-bit)
I am building a custom Export Wizard to export data to Excel using the Report Wizard for the basic ideas.
All I am trying to do is have a [Back] button on a form to open another form and close the current form.
Private Sub cmdBack_Click()
DoCmd.OpenForm "frm_ExportWizardPage2", , , , , , Nz(Me.OpenArgs)
DoCmd.Close acForm, "frm_ExportWizardPage3"
End Sub
The new form is opening but then the current form is not closing. All forms are the same size, shape and positioned centrally although this should not make any difference.
Could this be anything to do with which form has the focus when I open the new form?
View 2 Replies
View Related
Feb 4, 2014
I have a bound form with a few fields. I would like to run a sub after some of these fields are modified, but not others. I would like it to run only once, after user finishes his work on the form.
When using the Unload event - the form on the form is not there anymore (or did I get something wrong?).
Is there a way to trap Data on form just before the form closes?
View 4 Replies
View Related
Aug 25, 2005
Hi all,
I've added a message box to what is basically a standard simple to use access control, "closeForm", I'm a newbie working on learning access vb. I'm guessing my code if fudged. Any help is greatly appreciated.
Private Sub Close_Click()
On Error GoTo Err_Close_Click
Dim Answer As Integer
Answer = MsgBox("Press Ok to Close, Cancel to Continue.", vbOKCancel + vbQuestion, "Exit Data Entry?")
If vbOK Then DoCmd.Close
Exit_Close_Click:
Exit Sub
Err_Close_Click:
MsgBox Err.Description
Resume Exit_Close_Click
End Sub
Thanks to all in advance
View 5 Replies
View Related
Nov 13, 2014
I got an error msg on form with closing. I have a main form (SalesReturnOrDamaged) and subform (SalesReturnOrDamagedSubform).
i have used a VBA code on main form Close Command button as per shown in Code Tag. But that is not working and shown an error msg as per screenshot. how to change that VBA code for empty form close without save the record?
Code:
Private Sub Close_Click()
On Error GoTo Err_Close_Click
If Forms![SalesReturnOrDamaged]![SalesReturnOrDamagedSubform].Form![ItemCode].Value = "" Then
Forms![SalesReturnOrDamaged]![SalesReturnOrDamagedSubform].Form![Product].Value = ""
Forms![SalesReturnOrDamaged]![SalesReturnOrDamagedSubform].Form![MRP].Value = 0 Or ""
[code]......
View 1 Replies
View Related
Mar 26, 2013
Basically I have a Customer Form, which I have a New party button on it,this button opens up the party form to a new party, what I would like it to do is open up a new party but make the new party for the customer I had selected in the previous form.I have tried the GoTo macro's but cannot seem to get it to work.
I am thinking on clicking the button it will need to get the Customer ID, and then open the party form, create new party, and paste in the Customer ID, which then updates the Name - Date - Address - Company Fields.
View 5 Replies
View Related
Feb 17, 2005
This is related to some advice I received some time ago <a href="http://www.access-programmers.co.uk/forums/showthread.php?t=64818">here<a>
I am runnign some code, it performs some applications, then, if a Count Field is greater than 1, a form opens as a dialog, displaying some information:
Dim A As String
A = "NewForm"
If Me.[Count] > 0 Then
DoCmd.OpenForm A, acNormal, , , , acDialog
End If
If Me.Continue = "No" Then
Exit Sub
End If
The new form opens, and you can either view it, and click continue, which will run the rest of the code, or you can click quit, which updates Me.Continue to "No", and then it exits.
The problem is, when it exits the Sub, it doesn't really stop the code, it just leaves things kind of hanging. When I try to run the code again, I get:
3321 - The database engine could not lock the table 'NewTable' becuase it is already in use by another person or process.
Another symptom - The original form where I click to start running the code, has two date fields. Normally, when this form opens, they are blank, but when I exit the sub, as above, the previous dates I entered are still sitting there.
How can I make the forms really close?
View 2 Replies
View Related
Jul 14, 2005
When a form is open you can also see on the task bar that the form is open
If the user right clicks on the form(on the task bar ) they get the following options minimize , maximise , close.
Does any one know how I can stop the user selecting Close please ?
View 6 Replies
View Related
Oct 11, 2006
when i close the form all the fileds in the forms gets saved to the table.
i want it should pop up before closing to save it or not.
i have a button on the form to save the fields in the table.
which has code
command23_Click()
DoCmd.GoToRecord , , acNewRec
View 6 Replies
View Related
Aug 31, 2006
To try to keep a sane user interface I would like to close forms as another form opens.
If I put a Command button on FormA that opens FormB and it is set to find a record on FormB ... how can I close FormA when FormB opens.
I tried putting DoCmd.Close either before and after the code that opens FormB and ...
If I put it before the code - it just closes FormA without opening FormB ... if I put it after the code, if opens FormB and closes it.
Is there a way of saying on a form 'close the form that just opened me'? (like in javascript where you can reference the form with window.opener)
Thanks for any help.
View 4 Replies
View Related
Sep 19, 2006
I have found that when closing a form and changes have been made to the fields, these changes will be saved.
I would like to know if there it is posible to only save the changes when a command button is pressed and not when if you close the form any other way.
View 3 Replies
View Related
Jul 25, 2007
Hi,
How can I stop user from closing the form if the mantory fields are not filled up? I try using gotocontrol but it is not working.
View 1 Replies
View Related
Mar 14, 2005
Not sure what to call this "phenomenon" so haven't had any luck searching for an answer.
I have a form (form1) that has a close button with code behind it. When the button is clicked, it takes a few seconds for the code to run. When form1 closes, all is well up until: There is another form (form2) that is open behind form1. When form1 closes, part of it is still visible over form2.
Hope this makes sense. Any way to solve?
View 1 Replies
View Related
Mar 10, 2006
I'm looking for a way to cancel the closing of a form/app. I added a button asking if the user is sure they wish to exit, and am having difficulty finding the correct code to cancel the close event.Here is my codeDim ians As Integer ians = MsgBox("Are you sure you wish to exit?", vbYesNo, "Exit App") If ians = vbNo Then DoCmd.CancelEvent DoCmd.OpenForm "orderlist", acNormal Exit Sub End IfCan help or send me down the right path?Thanks
View 2 Replies
View Related
Sep 2, 2006
Hi guys!
When closing a form, I want my system to prompt: "Close without saving?". If yes, I want to continue the closing-proces, but when "no" is pressed, I want to just close the MsgBox-window and of course keep all the data-entries...
If MsgBox("Close without saving?", vbYesNo, "Close?") = vbNo Then XXXXXXX
What do I write instead of the X'es???
// JR
View 14 Replies
View Related
Oct 5, 2006
I have a control in Form1 and after LostFocus it open a Form2, Form1 rests still open. But I want to close Form1 after LostFocus. How can I do that?
Here is an example:
Form1:
Private Sub POD_LostFocus()
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Form2"
DoCmd.OpenForm stDocName, , , stLinkCriteria
End Sub
Thanks!
View 1 Replies
View Related
Mar 18, 2005
Hi
Can somebody tell me please how to prevent a user from closing a form if a specified other form is open?
Thanks
tt
View 2 Replies
View Related
Jun 16, 2014
I have a form that has some fields with validation rules, which are Not Is Null. I have a private function to validate records (here is a snipet)
Code:
Private Function ValidateRecord() As Boolean
ValidateRecord = False
Select Case Outcome
Case "Interpretation"
If IsNull(Me.[Date Provided]) Then
MsgBox [Date Provided].ValidationText
Exit Function
End If
[code]...
The form has a save and close button. I was wondering if there was a way to keep the form from closing if those fields are null. Right now, you click the button, the validation text pops up (it pops up twice too), and then the form closes.
I thought about maybe having the (If...Then, Inputbox)code in the Form_BeforeUpdate instead. If I do that, is there a way to do that for date textboxes and comboboxes where you choose the value instead of typing it?
View 5 Replies
View Related
Aug 7, 2014
I have a workbook which is already opened and I want to close it. the code that i have is (see below) is not working.
Code:
Function CloseExcel(sExcelFile As String) As Integer
Dim XLapp As New Excel.Application
Dim ObjXL As Excel.Workbook
On Error GoTo ErrorTrap
Set ObjXL = XLapp.Workbooks.Open(sExcelFile)
[Code] ....
View 4 Replies
View Related
Apr 26, 2005
Closing a form with a large amount of records is slow after sorting the records, is there a way to avoid this.
Its slower to close after sorting than the the sum of the time to close the form and sort the records, which doesn't seem to make much sense.
Can anyone help?
Ta - Paul
View 4 Replies
View Related
Feb 2, 2005
I have a form for inputting products into a table called "products". On this form is a combo box which lists the Suppliers. This list is generated by a Table called "suppliers".
If the supplier has not alredy been entered into the supplier table then it is not listed in the combo box list. I have added a button to open a supplier entry form to add the supplier to the supplier table. Once the new supplier is entered and the supplier entry form closed, the new entry does not show in the combo box list unless you close the product form and reopen it.
How do I refresh the combo box list without closing the form it is in and reopening it.
View 6 Replies
View Related
Jun 23, 2006
I have been surfing these forums for about 3 hours and I cannot find the answer to my question. So, if this is already answered in another post I apologize in advance...
Here is my problem. I need to have a "Login" form to start this db that I am working on. I have found a post that I referred to for the code with some editing to make it work for me.... The code is....
Private Sub Login_Click()
On Error GoTo errorfix
Set db = CurrentDb
Set r = db.OpenRecordset("tblBouncers")
Do Until r.EOF
If BName = r![Bouncer] And BPW = r![BPassword] And r![Active] = 1 Then
DoCmd.OpenForm "frmMain", acNormal
GoTo exit_sub
Else
r.MoveNext
End If
Loop
MsgBox "Invalid Login, Please Try Again."
BPW.Value = ""
DoCmd.GoToControl "BName"
BName.Value = ""
exit_sub:
Exit Sub
errorfix:
MsgBox Err.Description
Resume exit_sub
End Sub
Most everything works fine. If my username and password get qualified, the main form opens, or if my username and password are wrong, I get the appropriate message and it clears the boxes like I want it to. However, my problem is that I cannot, no matter how hard I play with this, get it to close the Login form, without encountering an error.
Yes, I know that the code above doesn't have anything telling it to close the form, because no matter where I put the "DoCmd.Close acform, "frmBLogin" "I keep getting an error message "This action can't be carried out while processing a form or report event."
What am I missing, and where do I put it? I have tried various locations for setting db and r to nothing then closing the form (based on advice from other posts I have read), but keep getting the same error, or worse (worse being can't close the error and have to end the process through task manager).
Will someone please direct me in the right direction? You can even go so far as to tell me my code is completely wrong... This is my first attempt at loops so you won't hurt my feelings.
Thanx for any guidance,
Jenn
View 1 Replies
View Related
Oct 6, 2004
Can anyone guide me to how to code a form that will not error when closed if nothing has been input to the first field which has the focus? I have a start up form that has fields connected to a table and if this database is open and the user desides not to use it then closes it without entering any data it will error. Is this a recordset issue? Thanks
View 1 Replies
View Related
Jan 31, 2008
Hey,
I have a form with 55 values entered. On closing the form, I need it to decide if this is a new record. If it is a new record, it loads all 55 values into an array. If all values are above 20,000, it goes ahead and closes the form. If any are below 20,000, it writes the record to another table and brings up that form to add add a comment.
Every thing does as it should except determining if it is a new record. What property will trigger it properly? All the properties I have tried either triggers it on all the records (even if it is an old record) or it does not trigger it and closes without prompting the code.
View 6 Replies
View Related
Dec 24, 2014
I have created a form with buttons which runs queries. The parameters I need for the query are being passed through just as I wish and the relevant query is run correctly. However, if I then press the button on the form with different parameters I get the results from the previous query. I can only solve this by closing the query before pressing the button. Is there an easy way to close the query to prevent this from happening. In case this is relevant, the only data which I am returning from the query is stored in the windows clipboard.
View 6 Replies
View Related
