Automating Membership Payments with User Form

How to automate membership payments with User Form in Excel.

A charitable organization holds meetings quarterly in January, April, July and October. Members pay their quarterly subscriptions during the meeting. Some may pay for 2 quarters or more. Monthly subscription is Rs. 400 or 400 money units. How can we design a user-form to fill the payment details per month automatically. Watch the video;

Watch this video on YouTube.

Automating Membership Payments with User Form
Automating Membership Payments with User Form

Here’s the complete VBA code to automate membership subscriptions:

Private Sub CommandButton1_Click()
Dim erow As Long
erow = Sheet2.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row
Dim paymentmonths As Integer
Dim dateofpayment As Date
Dim monthofpayment As Integer
monthofpayment = Month(TextBox2.Value)
paymentmonths = Val(TextBox3.Value) / 400

For i = monthofpayment To (paymentmonths + monthofpayment) – 1
If monthofpayment = 1 Or monthofpayment = 4 Or monthofpayment = 7 Or monthofpayment = 10 Then
Cells(erow, 1).Value = TextBox1.Value
Cells(erow, i + 1) = 400
Else

MsgBox “Meetings are held only in January, April, July and October!”
Exit Sub
End If
Next i

End Sub

Private Sub CommandButton2_Click()
Unload Me
End Sub

 

 

Published by

Dinesh Kumar Takyar

Welcome to exceltrainingvideos.com! My aim is to help you learn MS Excel including VBA. I always felt that a good way to learn something was to find solutions to problems in that domain. That is why I share these Excel videos with you. Mostly these are questions asked during my corporate training sessions. I've been training individuals and companies in computers since 1991. I did my B. Sc. (Vordiplom), M. Sc. (Diplom) and Ph.D. (Dr. rer. nat.) from Hamburg, Germany. The best thing about solving some of my visitor's questions is that I also gain new insights. For more Excel VBA solutions you may like to visit my YouTube channel: http://youtube.com/familycomputerclub For a structured Excel VBA training course online you can visit: https://www.youtube.com/excelvbaonline

Leave a Reply

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.