Forms :: Continuous Form With Textfields As Records - List Of Years With Totals Of Hours
Jul 1, 2015
I have a continious form with textfields as records. Its about total course hours that are calculated. There is a field in the records that holds and calculates the hourse that one have done and another field that holds the max hours they may follow for one year.
Every record has h different year.
When the amount of hours in the transmission textfield is negative, they can transmit the hours to te next year. Therefore i have to calculate the Max hours per Year + the transmission hours.
So the calculation is not a problem. Though i don't actually know where i can trigger the calculation. I have tried it with a button on the form, but then the user always have to click to see the right amount of hours for the next year. That's not handy. I am looking for a way to automatically calculate the field Max hours per year. Given that the Max hours per year is a bound field, its bound to a table where i stock the Max hours that i have calculated.
I also tried it with the button that's used for inserting new course hours, but then it calculates with the old values instead of the new ones.
How can i trigger the calculation automatically without using a button.
One shows my form with the Transporters Subform with 3 entries, and 1 entry.The three line items that say "Transporter" are in one subform. I used this code
Code: Private Sub Form_Current() If Me.RecordsetClone.RecordCount >= 3 Then Me.AllowAdditions = False End If End Sub
to limit the number of records I can add to 3 or less.My issue is that I lost the blank text box that allows you to add another record. So, if I only have one Transporter listed, there's no box to let me add a second or third.I have the following properties for the Transporters Subform set to "Yes":
Data Entry Allow Additions Allow Deletions Allow Edits Allow Filters
I have a bound continuous tabular form,However, based on data content in one field of a record, I want a checkbox in the same record enabled, so the user can check it if necessary. I have created a record set using the form as shown below, and I am looping through each record. To show that my code is referring to the field with required data content, I display it as a message box and it works, yet my checkbox does not enable.
I have the code in the form_load event, however, for testing purposes I have it behind a button.If I am seeing this properly, the code behind the button enables the checkbox for ALL records once the criteria in the required field is true, and based on the last record, which has no data content, it disables the checkbox in ALL records. I also have the PK ID for each record hidden in the form. Can I utilize that to target the checkbox of each individual record??
Form Detail -Form does not allow additions or deletions. Edits allowed -All fields are disabled and locked -I only want the check box to unlock if data is found in the "RequiredField" as referred to below. I have also tried if not isNull(requiredfield.value) then -enable checkbox, which yields the same results
Here is my code
Code:
Dim rstMyForm As DAO.Recordset Set rstMyForm = Forms!MyForm.Form.Recordset rstMyForm.MoveFirst Do While Not rstMyForm.EOF If Not RequiredField.Value = "" Then
Is there any way to highlight duplicates across a number of records on a continuous form (conditional formatting I presume)? My continuous form is filtered on load to show only the records relating to the specified date (specified before opening the form), and there is one field that I would like to highlight if there is a duplicate value in the same field on another record on the form. Is this possible?
I have a form listing tasks to which I make personnel assignments with a multi-value list field type. It takes some time to select from 15-25 employees on the list for each task, especially considering that small groups of employees will be assigned to the same selection of tasks.
What I want to do is select multiple records with the mouse, then click a command button opening a form in dialog mode with the selection list. The user then clicks to make his selections and clicks ok, which then updates the multi-select field for the selected records.
I want to populate a drop down combo box with a list of 10 years (current year +/- five years). I can enter them as a Value list but I don't want to have to update the list every year. Neither do I want to allocate a table to maintain a list.
Any ideas as to how I can auto populate the combo with a 10 yr span (5 previous and 5 next) and default to current year?
I have minimum year and maximum year value (for example 2006 is minimum & 2009 is maximum. How could I get a combo box to display all the years within the range of the minimum and maximum year (in this case, it should give me an option of 2006, 2007, 2008, 2009).
FYI - This database is used to track projects and each project has a commencement date and an estimated completion date. the minimum year is derived from the commencement date and the maximum date is derived from the estimated completion date. I am building a search form whereby the year selected in the combo box should display all the projects commencing, continuing, and ending that year.
I am trying to obtain totals from two columns in the list box into text boxes on the main form, but my third argument is not working as expected.The source of one of the tex boxes is:
I have database which holds records dating back 4 years. I am trying to create a code to list all records into report older than 3 years from current date, every time I run the code. The problem is I cant get the date part to work (highlighted in red) . I have tried various date options. The [datepickedup] is the date.
Private Sub Form_Load() Dim intStore As Integer DoCmd.Maximize intStore = DCount("[ReferenceNo]", "[WasteCollectionRecord]", "[DatePickedup] and [datepickedup]< #" & Date & "#- 1095") 'If count of uncomplete jobs is zero display switchboardor 'Else display message box detailing amount of jobs
I have a form with Continuous Records as its default view. I would like to number the amount of records displayed on screen to about 5 or 6 at a time instead of having them scrolling right off the bottom of the screen. Is there any easy way to do this? Thanks
I have a table and a form with continuous records (218 items). In a different table I have the status of these 218 items. In design view of the form I have added a label at the end of the record.
I want to use the DMax to set the caption of that label to the status of the particular item, but it sets the status of all 218 items to the status of item 1. How do I get it to distinguish between the records.
I guess somehow the record source for that label must be changed to the status table after form has loaded, and then run through all records and update the label caption.
I have a continuous form that opens all of the records for a specific user on a specific date and displays them in a continuous form. Each record requires an approval check box be marked before it can be processed for reporting. I want the approver to be able to click a button and mark all of the records displayed at one time. Currently my button will only mark the current record. How to I select all of the records?
I have a continuous subform (frmLabor) that has an unbound box in the footer. This unbound box totals all the numbers in the Total1 field using DSum. However, when I change the record in the main form (frmCustomers), that number still stays there, and when I add records (service hours) to the subform under a new record (customer) in the outer form, those numbers sum. I understand what's wrong, I just don't know how to fix it. How do I get it to calculate ONLY the records (service hours) in the subform per record (customer) in the outer form?
I would like to make an action list based on tasks. I try to make a query that does the following things:
-Taken.Priority=1 -show maxium 5 tasks sorted on make date(taken.ingevoerd) -OR with a total duration of maxium 480 minutes (Taken.[Geschatte duur (min))
The last one is to hard for me to make. For example if the duration of 4 tasks is 420 minutes, the fifth task (100 min) should not be shown, because the criteria of maximum amout of minutes is reached.This is what I have made so far:
SELECT DISTINCT TOP 5 Taken.ID, Taken.Omschrijving, Taken.Ingevoerd, Taken.Deadline, Taken.Priority, Taken.[Geschatte duur (min)] FROM Taken GROUP BY Taken.ID, Taken.Omschrijving, Taken.Ingevoerd, Taken.Deadline, Taken.Priority, Taken.[Geschatte duur (min)] HAVING (((Taken.Priority)=1)) ORDER BY Taken.Ingevoerd DESC;
I have Main form, and Subform (which is continuous form). Now when i open main form (or even subform itself) i see continuous form, and two empty rows.Whenever i fill first row and press on second, third row appears, and so on.
Can i set somewhere to show me only 1 empty row on this continuous form, and when i fill it, second row appears, and so on. E.g. is there any options for customizing how many empty rows are displayed and the begining of continuous form?
And how "saving of records" work here, because if i fill one row, it won't save anything....it will save it only when i press on other row (when third row creates)
I have a table that lists computers I want to know the age of them for replacement purposes. I am using this function to populate a textbox on a form that updates my table. the results I am getting is a negative whole number I would like to get a positive number with one decimal place. so if computer was shipped September 24, 2010 my textbox would say 3.5 not -3
Here is my function
Code: Private Sub Form_Load() Dim theDate As Date Dim age As Integer theDate = Nz(Me.compDate.value, 0) If theDate > 0 Then age = DateDiff("yyyy", Now(), theDate) Me.compAge = age End If End Sub
The Ignore, OverTime, AnnualLeave fields are bound to a I, O, A checkboxes respectively in this continuous form. The ExtraValue bound to a EV textbox in this form.
What I want is that when the user check O or A checkboxes, the EV textbox is enabled only for this form record NOT all the form records, when the user check I checkbox, the EV textbox is disabled only for this from record, NOT all the form records.
The problem is that whenver the user check, all the form records EV text box is affected by this action.
I've been trying to get my head round this one , but i'm just to thick to get it.
I have a continuous form that lists all items at a certain location. The user selects a record by clicking on the record selector and then clicks on a command button with this code:
The user then enters inspection details in to the "DivingInspectionCert" form which i want to store in a table (DivingCert) which will relate to the item. On completion of this form the user then clicks on a command button with this code:
DoCmd.RunCommand acCmdSaveRecord
If Me.RecordsetClone.RecordCount = 0 Then MsgBox "There are no items to Print", vbInformation, "EquiTrac" End Else DoCmd.OpenReport "DivingInspectionRpt", , , ("EquipmentID = " & Me!EquipmentID) DoCmd.Close
When i click on this button, the report doesn't print and i get a message "No current record". The inspection details are not stored in the table. I did have the forms RecordSource based on the table "DivingCert" but that didn't work and i have just tried a query but it is still not working.
Would be much appreciated if you can help me. Thank you
I have a form (Form4) which has a a list box (list11) that allows multi select. When I select on the records I need I hit a button that opens a form up with the selected records. This form is a continuous form. I have an unbound combo box (Combo55). Its values come from a specific table. I want to hit a button and change the field "Assigned" on all the records showing to the value that I selected in Combo55.
The problem is it only changes the value of the currently selected record. How Do I get it to change the value of all records that are showing?
I am only testing this idea with default field names. Before I implement the database I have to get a working model and present it. So I am building this and naming at the moment isnt important.
My form has a piece of code in it that deletes records older than two years :
Code: Dim dteExpiry As Date Dim strSQLDelete As String dteExpiry = DateAdd("yyyy", -2, Date) strSQLDelete = "DELETE from tblWaarschuwingen WHERE tblWaarschuwingen.datum2 <= #" & dteExpiry & "#;" DoCmd.RunSQL strSQLDelete But...
As it turns out it does not only delete records older then two years, but also records related with personnel number to that record !!
Now i do relate records by personnel number (its NOT the primairy key though) but in this case its not meant to do that !
I have a main form with several continuous subforms. Each subform consists of several listbox controls. I would like to require the user to select an item from the listbox before being allowed to move to the next record in the subform, and upon reaching the last record in that continuous subform, to require an entry there in order to move to the first record in the next cont. subform.
As an added bonus, it would be nice, though not necessary, to automatically jump the focus from one record to the next after data is entered. But my basic goal is to avoid skipping records.
Caveat: I cannot use the "required" option in the field to which the control is bound because that field has a default value previously entered using an append query. (The default value basically means "not yet entered" and is not one of the options in the listbox. I am using this because this field is a foreign key in the table, thus it must have a value in order to have a record with which to populate the subform.)
My apologies if this has been asked and answered elsewhere, but I've searched and, while I found a few related threads, they don't quite answer my question. Here they are for reference:
Thanks for any help! Also, if you are going to recommend VB code, could you be specific about how and where I should use it? I'm not afraid of code, but I'm definitely new to it...
I have created a form to input invoice details with a sub form to input the products with the prices etc.
This all works fine but now I want to create totals such as Total Goods, Total VAT and Invoice Total.
After many searches of the internet, I found out how to do this and put in the calculations which works fine and displays on the main form without a problem.
Now I have a problem as these need to be saved to one of my tables.
As these are unbound text boxes with only the calculation on, the data is not being recorded onto the form which is what I want.
Do I have to create a macro of some sort to do this or?
I have included a few images of what I have done but if you would like the database file I can upload that (I will take away all the information that is sensitive to me if that is okay?)
