Search results

Hi, I have a form that has a subform with a SUM in the footer of the subform. I have a button that takes the SUM value and writes it to an unbound txtbox called lockedvalue When I am in record 1 on the form, and click the button it does as it should with the SUM from the subform in record 1...

Hi, I am trying to insert a new record using VB. It works great however the issue I am having is when I have more than one ID when I run this code it always updates ID1 not ID2, or ID3 and so on. The table I am updating is a subform on a main form joined by ID. Is there a trick to use the code...

Great, thanks. So what if I had 36 payments not 24. Is there a way to calculate the last number in the DB with the IIF stmt? Fen

Hi, I have a table with a field called "Payment" this has one final payment called Residual all others are numbered 1-24 for an example. I am trying to figure out how I can force the table to sort 1-24 and then make Residual the last record? Thanks.

Ok, so I created an append query and it is getting closer however in my Schedule Table there are currently 36 records, all I want is to add 1 new record with the value "Residual" only one time, the append query is adding it 36 times.. Thanks. Fen

Thank you, I am sure that will work but unfortunately is too vague for my skillset. Can you elaborate, or can I just do it with a docmd insert into statement in the code I provided? I appreciate the help. Fen

Hi, I currently have a routine that creates a table and generates a schedule. It works great. What I am trying to do is after the routine runs, insert a new record at the end of the newly created table with a value from the parent form called "Residual" I am confident it can be done but I...

Perfecto! Thanks! Fen

Hi, I have been searching with no luck. I have a simple log in form that uses a UserTable for users and passwords. I simply want to capture the current logged in username (from the log in form) not the computer and call it when I need it, say to update a field "by" when the user makes a change...

Hi, I have an option group on a tab. It has 4 options. When I select one it works great but it will not allow me to select a different one without me going to a different tab and then coming back to it, any ideas why? Fen

Hi, I have a form with a sub-form. On my main form there is a calculated field called AmountPaid, it is a sum of the total payments in the subform. On the main form I have a field called Current. I am using the following code to update the Current Field when the AmountPaid is = to the Amount...

Hi, I have this sub: Private Sub PaidDate_AfterUpdate() If [PaidDate] > [DueDate] + 3 Then [LateFee] = [AmountDue] * 0.1 ElseIf [PaidDate] = [DueDate] Then [LateFee] = "0" End If End Sub If I wanted to apply another action such as: If [PaidDate] = [DueDate] or [DueDate] + 3 Then...

Hi, an interesting scenario just popped up. The code works great but if I put a starting payment date of 11/1/2015 and have 12 months say to 11/1/2015 to 11/1/2016 and run the code, the dates 11/1/2015 and 12/1/2015 do not get updated to 'Yes' but all others do. Any idea why? Is the >3 equal to...

Much appreciated, I agree with P, so how do I take this example you gave me and apply it to a query? Do I add this to the "Criteria" area for the field "delinquent" Fen

I was just thinking that, every time I load the form it does the update and that will become a pain, so do I use the same code in a query then?

Sweet! Works perfect... Many, many thanks. Is there a way to not update to 'Yes' if either the Date paid is = to Due date or Date paid is = Null? I really appreciate the help. Fen

Hi, I have a vba code that updates a status field when a condition is met. This works but only updates the first record not all of them. Is there a way to update all the records if the criteria is met? Thanks. Fen 'This makes the due payment marked as delinquent if the due date is <3 days past...

I found this and it works however it adds one day versus one month.. Public Sub FillDates() Dim Db As DAO.Database Dim rs As Recordset Dim dteFrom As Date Set Db = CurrentDb Set rs = Db.OpenRecordset("tblDates") dteFrom = #1/1/2016# dteTo = #1/1/2017# With rs Do Until dteFrom = dteTo + 1 '...

Yes, that is what I meant. I already have the table. Any chance for an example I can look at? Fen

Hello, I am looking for a way to auto create a table with a macro or code. What I have is a Start Date and a Term in months. If I have a start date of 1/1/2016 and it is for 12 months. I want to create a table that has a date column with 1/1/2016, next record 2/1/2016 and so on for the total of...