結果 : vba string to integer function