General :: Modal Form - Open Concrete Form And Pass Value To Control
Jun 21, 2013
I have modal form - frmZlecenia
I would like to copy one control, then close this form, open concrete form and pass value to control.
My code is
Private Sub Menu_Click()
DoCmd.OpenForm "frmZleceniaMarzenaNawigacjaPD"
Forms!frmZleceniaMarzenaNawigacjaPD.Form!Imie = Me.Imie
Forms!frmZleceniaMarzenaNawigacjaPD.Form!Imie.SetFocus
DoCmd.Close acForm, Me.name
End Sub
The problem is, still opens the previous form, not form "frmZlecenia"
e.g If I open form x then from this form I open my modal form "frmZlecenia" and then I will click "menu" button - now form "x" is open :/, but should be "frmZleceniaMarzenaNawigacjaPD"
There is some way to open concrete form from modal form?
View Replies
ADVERTISEMENT
Aug 2, 2012
I'm trying to open a recordset in vba and I'm getting the 3061 runtime error,Expected 1.
I'm trying to open a recordset with a query that uses a reference to a form control.
Code:
searchtable1 = "qInVisio_RSV"
Set rs = db.OpenRecordset(searchtable1, dbOpenDynaset, dbSeeChanges)
This is the sql of the query:
The highlighted parted is the form referance ( I know it's obvious, just for easier spotting )
Code:
SELECT dbo_FOLIO.FOLIOID, dbo_FOLIO.KIND, dbo_FOLIO.RSVID, dbo_FOLIO.CHKIDATE, dbo_RLIST.ROOMID, dbo_ROOM.ROOMNO, dbo_AGN.LINAPRG
FROM (dbo_ROOM INNER JOIN (dbo_FOLIO INNER JOIN dbo_RLIST ON dbo_FOLIO.RSVID = dbo_RLIST.RSVID) ON dbo_ROOM.ROOMID = dbo_RLIST.ROOMID) LEFT JOIN dbo_AGN ON dbo_FOLIO.AGNID = dbo_AGN.AGNID
WHERE (((dbo_FOLIO.KIND)=101) AND ((dbo_FOLIO.CHKIDATE)>=[Forms]![frmCleaningPlan]![DTPicker]));
also as you can see it's a datepicker control, so the value is a date...
View 2 Replies
View Related
Apr 19, 2006
Hi All,
I should know how to do this but my brain has gone blank.
I have a form "frmMainClient" which has a field "account_no".
On the main form "frmMainClient" I have a command button which opens a pop up form ""frmJobNew" where I can enter a new job record. The "frmJobNew" form has a field "account_no".
I am trying to auto fill the "account_no" field with the data from the "frmMainClient" - "account_no" field and store the passed data when the record is saved.
I can pass the data using "=forms![frmMainClient]![account_no] in the "account_no" field on the "frmJobNew" but when I save the record the data is not saved.
Can anyone offer help, please
Many thanks.
View 3 Replies
View Related
Jan 11, 2015
In Access 2013 I have a table to registry the presents in a condominium meeting.
Table Name: tbEntities
Fields:
tbEntId...tbPresent (yes / no)..........tbVotes
1.........yes...........................5
2.........no.............................3
3.........yes............................4
4.........no.............................6
I want to put in a form (like a navigation/menu form, with no souce data):
1. a control that count how many are present (= yes)Ex: Appearances 22. a control that sum the votes of those presentEx: 9 Votes
View 6 Replies
View Related
Jan 12, 2015
In Access 2013 I have 2 tables
tbAssembleias
tbEntities
The tbEntities, have a fiel called tbPresent (yes/no) to register the presents in a condominium meeting.
Table Name: tbEntities
Fields:
tbEntId...tbPresent (yes / no)..........tbVotes 1.........ye...........................5
2.........no...........................3
3.........yes..........................4
4.........no...........................6
In the form is the table tbAssembleias, but I want to put from the other table which is not present in the form:
1. a control that count how many are present (= yes)Ex: Appearances 22. a control that sum the votes of those presentEx: Votes 9I already have a query that count how many are in the meeting, but cant realize how to pass the information to the field in the form..This is the SQL view of the query with the real field names - and working:
SELECT Count(tbEntidades.tbAssPresente) AS ContaPresentes, tbEntidades.tbAssPresente
FROM tbEntidades
GROUP BY tbEntidades.tbAssPresente
HAVING (((Count(tbEntidades.tbAssPresente))=True) AND ((tbEntidades.tbAssPresente)=True));
View 1 Replies
View Related
Feb 19, 2014
I have a button on my main db, that opens a second db using hte following code:
----------------------
'Dealing with external objects, use inline error trapping
On Error Resume Next
Dim appAccess As Object
Dim db As Database
Dim strAppPathName As String
Dim strAppName As String
Dim strTimesheetPathName As String
[Code] ....
This code works great to open the other db, and handles wheter the other db is already open or not, but I cant seem to pass the variable to the other db using the startup switch /cmd.
I suspect if I used the shell method it would pass the cmd , but I havnt found any way to test if the db is already open with the shell method.
How can I pass a variable to the other db when opening it using VBA?
View 10 Replies
View Related
Jan 28, 2015
I have a stored procedure created in SQL SERVER 2008r2
I have a form in access adp project with combo boxes, when I click the submit button I want the values chosen to be the parameters and the stored procedure called to generate a report
Is this possible .
View 1 Replies
View Related
Sep 11, 2014
I have a data entry form which have a date field.This field retains the existing date after the record is saved with vba after update event.
Private Sub Form_AfterUpdate()
Me.ProductionDate.DefaultValue = Chr(35) & Me.ProductionDate.Value & Chr(35)
End Sub
Almost after a year of perfect working i am facing a problem.When i save the record , in date field my date and month values are reversed if date is between 1-12.although my database stores perfectly valid date. for example if date is "10-09-2014" (dd-mm-yyyy) after saving form date field becomes "09-10-2014". but if date is "13-09-2014" The date form field retains this value .
View 2 Replies
View Related
Jan 27, 2006
I've searched this forum and have been reading for over 2 hours now and still can't find an answer to this (although I have learned a bunch of other stuff :) ). So I appoligize if this have been answered before...
When I open my form my tab control is off screen (above the current view). I can use the slider on the left to move back up to the top of the form and see them... but why can't I make this happen automatically. This happens because one of my tabs is quite long (has several sub-forms on it). I even tried putting an empty label box above the tab control but it doesn't seem to help. I've turned off the Auto-Center and the Auto-Resize for the form. I can't find anything that helps.
Any idea? Please help.
Thanks,
Jeff
View 3 Replies
View Related
Aug 27, 2014
I am having issues with a split form which modal and emergent (pop-up) properties are set to yes. When I open it, it is maximized or out of the size I had setup; although I saved it trying to "freeze" the height and width.
View 11 Replies
View Related
Dec 29, 2014
How do you set the focus on the first field in a modal form when it opens?
View 3 Replies
View Related
Feb 24, 2015
I have a from that has information icons that opens a separate form to support users make the right choice on a form. With each information form users are able to choose "Yes" or "No" and then it returns them back to the form they started. I am having trouble setting the focus to the control the user original left the form from.
Form A
Control 1
Control 2
Control 3
Form B
Information for Control 1
Form C
Information for Control 2
Form D
Information for Control 3
For Forms B - C I would like the form to close, open Form A and then set focus to the control that the form was providing information for.For example, if you are on Form C and you make a decision, I want Form C to close, Form A to open and focus to be set to Control 2.
Code:
Private Sub image5_Click()
Dim sWHERE As String
Criminal_Background.Value = "Yes"
[code]...
View 8 Replies
View Related
Dec 15, 2006
Private Sub btncard_Click()
Dim stLinkCriteria As String
DoCmd.RunCommand acCmdSaveRecord
stLinkCriteria = "[jobref]=" & "'" & Me![jobref] & "'"
DoCmd.Close
DoCmd.OpenForm "k_job_card", , , stLinkCriteria
End Sub
this button code opens the k_job_card form.
the form opens and says 'Record 1 of 1, (Filtered)
i have a control on the form that opens.. and i am simply trying to assign a default value to that control..
it is a textbox.. for my jobtype field (text datatype)..
is there any particular reason why i cannot assign a default value to a control if it has been placed on a form that has been opened using a form filter?
this is how the Form Data tab is set at the moment..
View 3 Replies
View Related
Jul 22, 2014
I have a modal form which has a single record which is then linked to a sub-form on the same modal form. This all works fine and shows the relevant record and sub records but I want the modal form main record to change dependant on the record selected in the subform (which is basically order item history.
I found some code on another site which seemed to work for others but for me I am getting Run-time error 2465 and it doesn't like my reference to 'Me' - is this because it is a modal form?The code I am using is:
Public Function GotoRecord(RecordID As Long)
Dim rst As DAO.Recordset
Dim strCriteria As String
Set rst = Me.RecordsetClone
strCriteria = "ID = " & RecordID
rst.FindFirst strCriteria
If rst.NoMatch = False Then
Me.Bookmark = rst.Bookmark
[code]....
View 1 Replies
View Related
Oct 13, 2015
I am at my Login Screen, I want it to return to the Login Screen if you select "NO" and Close the DB if "YES"
Here is my current code:
Private Sub Form_Close()
If MsgBox("Would you like to EXIT the Database?", vbYesNo, "Quiting Database") = vbYes Then
Application.Quit
Else
???
End If
End Sub
View 5 Replies
View Related
Feb 5, 2014
I I have a SpouseID field in my Contacts table to link spouses.When a spouse is selected in one contact's record, I want to be able to automatically update the other contact's SpouseID control.I have created a calculated control called txtSpouseID that uses DLookup to find the ContactID for the other spouse:
=Nz(DLookUp("[ContactID]","tblContacts","[Spouse] =" & [ContactID]))
And I have entered this code into the form's OnCurrent event:
Code:
If Not IsNull(Me.txtSpouseID) Then
Me.Spouse = Me.txtSpouseID
End If
However, this obviously only works if the user navigates to the spouses record. If s/he doesn't then the value does not get entered into the table.
View 2 Replies
View Related
Jul 27, 2013
a couple of months ago i found a celndar control replacement that Microsoft kindly provided. i have made a few mods that allow me to change the day/week etc. i would now like to tell it to open on a certain date. the reason is that on each of my client records i have 'Future Appointments'. i would like to be able to select a future appointment and click a button that then opens a form that includes the calendar and go to the date of the future appointment. the calendar controls the diary. whatever date the calendar is on the diary matches. so to change to the date of the appointment i need to change the calendar date.
i tried the obvious first.
[Forms]![frmDiaryMultiView]![frmCalendar].Value=#01/01/2012#
that didnt work as the calendar does not seem to recognise it.
i am totally lost with this as i dont even understand most of the code that is behind the calendar, so i dont know what i am looking for to use to open it on a given date.
View 1 Replies
View Related
Jun 30, 2014
I have three tables see below
tblplantitem
tblplantgroup
tblplantservice
so I have frm called frmplant which holds the plantgroupname I.E plant type (airblow,leads) then I have subform call plantitemtblsubform which holds the plant item serial number, value ,service date which works great now my problem I have command buttom on subformplantitemsubform then opens form call frmpopupPlantService this opens to show plantitem service history but when I add a record then save close then click the same plant item to open form frmpopupPlantService show no service history even when I just entered ...
View 5 Replies
View Related
May 18, 2015
When I change a font for a control, save it and then reopen it the font changes back to another font.
It's always the same font.
I'm trying to save it to Calibri but it reverts back to Constantia for some reason.
I've deleted the bound control and added it back but it did no good.
The only way I can change the font is to set it in the On Load of the form.
View 1 Replies
View Related
Nov 23, 2014
how can open a report using 2 unbound textbox on a form as user input date criteria
View 2 Replies
View Related
Sep 19, 2013
I have designed a main form which have buttons for about 30 different companies name to open, each button opens an individual company form. Now the companies list is growing day by day so i want to create a combo box which select the company name and open the relevant company's form.
Do I need to create a table which lists all the companies and then add a combo box on a main screen which select the company name and open the form but i need a VBA code for that.
View 14 Replies
View Related
Sep 4, 2012
I am struggling with a slight form delay. When it opens on the OnOpen event, i am populating a grid. This takes about 3 to 5 seconds but, the it also takes the form the same time to open. What i need to do is get the form to open then populate the grid. Can i make the form open first then populate?
View 4 Replies
View Related
Apr 21, 2015
I have Form A that is bound to tbl_Member (MemberId, LastName, FirstName, and some other fields).
On Form A is a combobox [cbo_Selector]. The combobox shows LastName and FirstName from tbl_Member, but when a name is selected, it returns the member's ID to Form A and causes that member's record to show in Form A (along with other data pertinent to the member). This works fine until I type a name into the combobox that does not exist in the underlying table.
I use the NotInList event of the combobox to pop up another form (Form B) in the DataEntry mode. Form B is bound to the same table as Form A. I enter the LastName, FirstName, and exit Form B. What I am trying to do is to have Form B pass back the new MemberId to Form A and specifically to add that record's data to the combobox on Form A.
I have tried several things to accomplish this. When Form B updates, the table has the new member added, but when I try to requery Form A or the combobox, I get errors. how do I communicate to the combobox in Form A the information from the newly added record?
View 11 Replies
View Related
Jul 15, 2013
i have a form with a sub form and combobox, when i select item i want that the sub form will be update with new values according to parameters from the combox.
the data of the sub form is from query with criteria
Code:
[Forms]![Examination]![Client_ID]
and the combobox (Client_ID) "After Update" event set to macro- requery (the sub form)
so every time that item selected in the parent form combobox the sub form items /data will change.
*i attached a screenshot
View 3 Replies
View Related
Jun 22, 2014
So, I've got a frmCustomer and want to link the form to frmNewWorkOrder using a button.
More precisely when I choose/scroll to a customer and click the button "New work order" to autofill data from selected client from frmCustomerto frmNewWorkOrder (First and Last name, telephone number and client ID).
View 2 Replies
View Related
Dec 11, 2012
i want to ask is there any way to open another access database using when click button at form.. for example i have tracking.accb then at my switchboard form, i would like to have a button that can go to another access which is borrow.accb. can these possible for me to do it..?
View 3 Replies
View Related