Thanks for your explanation, no matter what I try nothing happens, this is my full code (I've changed some of the text boxes to make it easier for us to understand)..
Private Sub DonationAmount_AfterUpdate()
MonthsBox.Value = DateDiff("m", CDate(StartDate.Value), CDate(TodaysDate.Value))
End Sub
Private Sub TotalTextBox_AfterUpdate()
TotalTextBox.Text = Val(MonthsBox.Text) * Val(DonationAmount.Text)
End Sub
Private Sub FinalDonations_Change()
FinalDonations.Text = Val(CashDonations.Text) + Val(TotalTextBox.Text)
End Sub
MonthsBox displays how many months the person has donated.
TotalTextBox displays the final calculation amount by how many months, times the donation amount (we have two which I select from a drop down combobox)
FinalDonation adds the CashDonation amount and the TotalTextBox together to show how much a person has donated to our charity.
All works, just a pain keep placing a number in the FinalDonations to show the final amount.
The main places I will edit are the donation amount and the cash. Any help would be grateful.
Bookmarks