[mso] Excel 2000 count transactions and add totals?

  • From: "Donald C. Smith" <DCSmith@xxxxxxxxxxxx>
  • To: "Mso-Microsoft Office Newsgroup (E-mail)" <mso@xxxxxxxxxxxxx>
  • Date: Sun, 2 Nov 2003 19:38:59 -0500

I am a member of a small church and we hold 5 to 6 Dinners a year to help
pay the expenses of the church.  BTW we just held one and took in over
$700.00 for the church ( that is good for us)  Anyway, I setup my notebook
and made a little excel sheet to help calculate the cost of the dinners and
change back.  It is set up like this:
(Row 2 Column A-F Title)   "Community Chapel Dinner"

(Row 3) Headings:
(Column A) "QTY"
(Column B) "Ticket Type"
(Column C) "Amount"

(Row 5):
(Column A) cell where the number is entered for Adult Tickets
(Column B) "Adults"
(Column C) Formula for calculating $ amount of Adult Tickets

(Row 7):
(Column A) cell where the number is entered for Senior Tickets
(Column B) "Seniors"
(Column C) Formula for calculating $ amount of Senior Tickets

(Row 9):
(Column A) cell where the number is entered for Children Tickets
(Column B) "Children"
(Column C) Formula for calculating $ amount of Children Tickets

(Row 11):
(Column B) "Total"
(Column C) Formula for calculating the total amount of all the dinners

(Row 13):
(Column B) "Amount Tendered"
(Column C) Cell where you input amount tendered

(Row 15):
(Column B) "Change Back"
(Column C) Formula for calculating return change to customer

(Row 17&18 Column C)
Button titled "Clear Sheet" with this VB Code Attached:

Sub Clear_Community_Chapel()
    Range("C13,A9,A7,A5").Select
    Range("A5").Activate
    Selection.ClearContents
    Range("A5").Select
End Sub

Now three questions:
I want to leave the "Clear Sheet" button for mistakes but would like to add
the same code and additional code to a "transaction complete" button which
would also add up the number of transactions that evening and have it either
entered somewhere on that sheet or the sheet immediately behind that one,
makes no difference.  Would like help and suggestions for doing this.

Also it would be helpful if there was also a way to total up the total
number of tickets (adult seniors and children) and have that either entered
somewhere on that sheet or the sheet immediately behind that one, makes no
difference.  Would like help and suggestions for doing this, if it wouldn't
require an Excel Expert in programming.

And if it could also calculate the total amount of all the dinners that
evening taken from cell C11.

I am thinking the first one is probably going to be easiest to do, I believe
it involves the count function and will be entered just before the "end sub"
and just keeps adding one each time the "Transaction complete" button is
pushed, but cannot figure out how to enter the code, but just in-case I
thought I also might throw the other two out to see what would be involved.

Thanks
Don





*************************************************************
You are receiving this mail because you subscribed to mso@xxxxxxxxxxxxx or 
MicrosoftOffice@xxxxxxxxxxxxxxxx

To send mail to the group, simply address it to mso@xxxxxxxxxxxxx

To Unsubscribe from this group, send an email to 
mso-request@xxxxxxxxxxxxx with the word "unsubscribe" (without the quotes) in 
the subject line.

Or, visit the group's homepage and use the dropdown menu.  This will also allow 
you to change your email settings to digest or vacation (no mail).
//www.freelists.org/webpage/mso

To be able to use the files section for sharing files with the group, send a 
request to mso-moderators@xxxxxxxxxxxxx and you will be sent an invitation with 
instructions.  Once you are a member of the files group, you can go here to 
upload/download files:
http://www.smartgroups.com/vault/msofiles
*************************************************************

Other related posts:

  • » [mso] Excel 2000 count transactions and add totals?