Total column on multiple sheets

[mbesspiata]

I have vba to separate out invoice costs into separate sheets in excel. I need vba to add the total to those columns on each sheet. I other words, I need the macro to add the total to the column (I) and move to the next sheet and add the total to that column and move on to the next sheet.

 

[Logit]

.
You'll need to add to your existing macro ... code that will locate and select the first blank cell in that column. This macro should be activated
AFTER the costs have been pasted to the invoice.

The next step will be to add a formula to the selected cell that totals everything in the column.

To find and select the first blank cell : http://www.excelhowto.com/macros/find-select-first-blank-cell-column-vba/

To insert a formula :

 ActiveCell.Value = "=Sum(I1:I20)"

NOTE: The example formula is only an example. You will need to adjust the range.



Another approach would be to place the TOTAL cell at the TOP of the Column I and include the formula there when creating
the INVOICE SHEET. It will be a part of the sheet already. Then you can skip all of the above. An example formula would
be

=SUM(I2:I20)

and this would be placed in I1