String Array Using Functions Vba Code In Word