Vba Set Multiple Variables To Same Value As 5