Multievaluation sub Has 3 different evaluations

[COURTTROOPER]

Hello all,

I am in need of help again and as a noob all help is appreciated.
I have attached a sample file and below is my code.
The code should be to evaluated columns T, X and AB.

1. Check amount entry into column T
2. If check amount is = to Fee ($150.00) then variable CheckTotal equals column T Stop entry process.
3. If CheckTotal is greater than Fee then subtract from Fee from CheckTotal and the result is placed into column G, Stop process.
4. If CheckTotal is less than Fee the column U equals Entry #
5. Check amount entry into column X
6. CheckTotal equals column T+X
7. If CheckTotal amount is = to Fee ($150.00) then Stop entry process.
8. If CheckTotal is greater than Fee then subtract Fee from CheckTotal and the result is placed into column G, stop process.
9. If CheckTotal is less than Fee the column Y equals Entry #
10. Check amount entry into column AB
11. CheckTotal equals column T+X+AB
12. If CheckTotal amount is = to Fee ($150.00) then Stop entry process.
13. If CheckTotal is greater than Fee then subtract Fee from CheckTotal and the result is placed into column G, Stop entry process.

I have been trying variations for two days to get my code to work but I just can’t seem to get it solved. You may ask why have three checks and the answer is that one of the retailers will sell our customers three $50.00 checks for the total of $150.00. Some come in with checks for $100.00 and $50.00. The some bring in checks for over $150.00 so we don’t always have exact amounts.
Thanks in advance for all help received.

Please Login or Register  to view this content.

[AlphaFrog]

Please Login or Register  to view this content.

[COURTTROOPER]

Thanks ALPHAFROG so much! I am new to VBA and would like to know how you picked the case format for my problem? Is there a way to approach coding types that I should be looking for in each type of situation I am writing code for (i.e. what I am trying to accomplish with the code, etc.) ?

[AlphaFrog]

You're welcome. Glad it worked out.

Understanding when to use something like Case or any other commend is just a matter of experience.

The Case function works like an If-ElseIf function which would work just as well.

Please Login or Register  to view this content.