Dynamic Size Array Vba Syntax Substring