Vba If Array Element Spacing