adding values to variable array VBA adding values to variable array VBA vba vba