VBA changes to reflect break out of Total charges

I own an auction company and am setting up a spreadsheet to be used at the time of auction. I had one made but when I looked at the Buyers Report page (the page that will be printed out at the end of the sales), It only had a total and did not break out what that total included. Also I needed to add a surcharge to the Grand total if paid by credit card. I have broken out the totals on they buyers report page to what I need. For the sales price it would come from the worksheet sales column H, for the Buyers Premium it would come from Sales column K, for the Tax this would come from Sales Column J. The surcharge would be on on the grand total adding on a percentage which would be found on sales L2. so if the total of sale price, buyers premium and tax is 100, then that amount would have a surcharge found on L2 added to the $100. Then I need a running total so that it is easy to find which is on the top of the buyers report under all the demographics that would be the amount that we would need to collect at the end of the night.

There is a VBA done but it is only bringing in the Total (which includes the buyers preimum and taxes) and the surcharge is yet to be included.

I am hoping someone could help me fix this as I have a fix but it is pretty convuluted and adds a lot of steps.

Any help would be great as I have never really worked with VBAs before.

Thanks

Here is some play data. As you can see it brings in the total values on to the buyers report. I just need that to be broke out and then add a macro that will add the surcharge if a credit card is used (this one was added after I had this spreadsheet made).

Thanks for your help