Hey guys!

I've got some seperate values - Import, export and total in a "summary" sheet. I've got a code that brings these into my "final sheet"

The Summary is the Sub Total of my data, The final sheet is the Grand total of the data. What I need is for someone to show me a code that can autosum Columns D, E and F, insert these totals below the last line in these columns. Once this is done I have a code that brings the totals from the summary to the final sheet, these will insert below the autosums (grand total) What I need it to do from here is to put the sub totals above the grand totals and introduce a formula that removes the grand total from the sub total. Is that possible if anyone knows?

Code that I've actually written is:

Sub copyimport38() 
    Dim lngNextRow As Long 
    With Sheets("Final Sheet") 
        lngNextRow = .Cells(.Rows.Count, "E").End(xlUp).Row + 1 
    End With 
    Sheets("Final Sheet").Cells(lngNextRow, "E").Value = Sheets("Summary").Range("E31").Value 
     
End Sub
I've not done anything else literally because I haven't got a clue where to go from here to do the above description, any ideas?



Also posted on:

http://www.ozgrid.com/forum/showthre...d=1#post587456

http://www.mrexcel.com/forum/showthread.php?t=597834