Vbscript Loop Through Array In Vba