Excel2003/2007でHtml形式の保存を同様にするには?


けい  2009-03-13 18:57:02  No: 101606

エクセルファイルの内容をHTML形式に保存する処理を行なっています。
開発環境はVB6
参照設定で[Microsoft Excel 11.0 Object Library]を設定しています。

Excel2003がインストールされたPCで実行すると、そのままHTML化されます。
Excel2007がインストールされたPCで実行すると、
HTML化されたファイルの下部分にシート見出しが表示されてしまいます。

シート見出しが表示されないようにする事は可能でしょうか?

Dim xlApp           As Excel.Application    
Dim xlBook          As Excel.Workbook       
Dim xlSheet         As Excel.Worksheet      
    
Set xlApp = CreateObject("Excel.Application")
    
'ファイルを開く
Set xlBook = xlApp.Workbooks.Open("C:\test.xls")
Set xlSheet = xlBook.Worksheets(1)

'HTML形式で保存
xlBook.SaveAs "C:\test.html", xlHtml


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加