$40 Array sums ect in vba