Fixed 1st item - put a case select (referring to the securitylevel) on the On Open of the form, which enables/disables the toggle buttons.
Now for the 2nd item .....
I have an option group with 4 toggle buttons on a form, which the user selects personnel type to show their respective records on a tabbed form. Each toggle button on the After Update, shows their respective list box listing the personnel (either Salary, Hourly, All or Terminated). When an...
Try the following code:
Private Sub Form_BeforeInsert(Cancel As Integer)
On Error GoTo Form_BeforeInsert_Err
' Set Purchase Order No to "Max" + 1
Forms!PurchaseOrder!PurchaseOrderNo = DMax("[PurchaseOrderNo]", "Purchasing") + 1
If...
Here's my code for a tab control form, allowing for 12 buttons for the alphabet and 1 button that shows all. Modify it to your field names:
Private Sub EmployeeNameFilters_TabChange(ByVal nNewTab As Integer, ByVal nOldTab As Integer)
nCount = nNewTab
Select Case (nNewTab)
Case...
Dear Bob:
Sounds exactly like what I want to do - I will try it out tomorrow and get back to you. If it works, it will certainly allow me to do away with a number of forms.
Again, many thanks.
Carol
I have a number of different reports each asking for certain information via parameters set up within different forms. What I would like to know, is, can one form
handle all the queries for a number of reports, utilizing the visible of certain fields l and if so, how can this be called on via...
Steve:
There is no subreport. The first textbox is AgreementStartYear and the control source reads:
=InputBox("Form No. HRF-2.01 - Please insert Calendar Year)
The second textbox is Agreement EndYear and is after a page break, again in the detail section.
Funny thing is that if both...
Thanks for the reply Steve. One minor problem I neglected to tell you - The second field to be updated is on the 2nd page, which is where I think the problem is.
Any other thoughts.
Carol
I have a report that asks the user to state a year via a input box. Everything is fine. On the report, this year must be displayed in another area of the report.
Is there anyway, that this field - after update via the input box can copy the results and place the year in the other field...
I have a query which has a DateTerminated field (date format) and I would like to restrict the records to show all employees that are not terminated before a certain time.
Right now if I put "Is Null" in the criteria line, it gives all employees who are not terminated.
If I combine...
I have the following set up in a query to determine the Years of Service of Employees:
YearsService: DateDiff("y",[YearHired],[Year])
[Year] contains the years 2000 through to 2005. This query will automate the vacation allowance of each employee.
Everything calculates correctly...
Thanks Steve 101 - your suggestion worked. Now the only problem is that it is only populating the form with the last record. I wanted all the records to populate. Maybe I don't have my loop set up correctly.
Here is my code:
Private Sub Employee_AfterUpdate()
ctYear1.ClearDays...
I have the following code:
Private Sub Employee_AfterUpdate()
ctYear1.ClearDays
Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Dim prm As DAO.Parameter
Dim rst As DAO.Recordset
Dim Image As String
Set db = CurrentDb
Set qdf =...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.