HRESULT: 0x80028018

     Dim CurrentCI As System.Globalization.CultureInfo = System.Threading.Thread.CurrentThread.CurrentCulture

        System.Threading.Thread.CurrentThread.CurrentCulture =  New System.Globalization.CultureInfo( " en-US ")

 

It's a bug about Excel interop. 

 adding the above previous to your code.

 

你可能感兴趣的:(HRESULT)