Loop which copy values from many sheets

Yeah, I know but the "& LR" copy also cells with sumed value below my chart.

I tried to avoid having sumed values in "mystats" by adding

Range(Selection, Selection.End(xlDown)).Select
Selection.Copy

But it's not that big deal.