RAJAQ
12/1/2016 - 10:44 AM

Get Sum Statement Converts a columnar range into a row adding up all values > It will copy the result > Once macro has run just paste values

Get Sum Statement Converts a columnar range into a row adding up all values > It will copy the result > Once macro has run just paste values only in the destination cell. <> select a particular workbook and sheet and cell.

Get Sum Statement
content_copyfile_download
Sub GetSum()
Application.ScreenUpdating = False
    
    Workbooks("Converter (Macro)").Worksheets("Converter").Activate
        Range("B7").End(xlDown).Select
        ActiveCell.Offset(0, 2).Select
        Selection.Copy
        
        Range("D3").Select
        Selection.PasteSpecial Paste:=xlPasteValues


    Range("B7:B500").Select
    Selection.ClearContents

    Range("D3").Select
    Selection.Copy

    Range("B7").Select

End Sub