Question

VB中把Excel文件另存为HTML文件

请问各位大虾我用一下代码把Excel文件另存为HTML文件,为什么转换好的HTML文件打开是乱码？
Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet

Set xlApp = Excel.Application
Set xlWorkBook = xlApp.Workbooks.Open("c:/te.xls")
xlApp.Visible = True

Set xlSheet = xlWorkBook.Worksheets(1)
xlSheet.SaveAs FileName:="c:/te

xlWorkBook.Close
xlApp.Quit
Set xlApp = Nothing
Set xlWorkBook = Nothing
Unload Me

Answer 1

稍稍改动一下：

xlSheet.SaveAs FileName:="c:/te.htm",FileFormat:=xlHtml

这样就应该能解决问题了吧

Answer 2

改一下，如果不行就没办法了！