VBA code for sum function for filtered columns

[Veeru]

Hi,

I have one code which can find last row and apply sum function.

Im looking something which willl do for filtered valus as well.

sorry i am not sure how to paste code here.....

Thanks

[mancubus]

sorry i am not sure how to paste code here.....


see #1 in may signature.

[Veeru]

Sorry still not find....# 1 is not working

[Paul_Hossler]

Sorry still not find....# 1 is not working

21716

[Veeru]

Do i need to paste code in between code/code...no sure but I am attaching a excel with code in it...
hope that will help. thanks

[mancubus]

Sub addtwo()

Dim LastRow As Long

With Sheets("FY-2017")
LastRow = .Cells(.Rows.Count, 6).End(xlUp).Row
.Range("J1").Formula = "=Aggregate(9,7,F2:F" & LastRow & ")"
End With

End Sub


what is wrong with the Aggregate function?



if you want to display the formula result rather then the formula in a cell, you can use Evaluate method



.Range("J1").Value = Evaluate("=Aggregate(9,7,F2:F" & LastRow & ")")

[Veeru]

Thanks Mancubus...it is working fine now.....apprecaite your time

[mancubus]

you are are welcome

mark the thread as solved (my signature, #3) for future references to the thread pls.