EXCEL2000 VBA 選択範囲をHTMLとして保存する実験

EXCEL2000 VBA  選択範囲をHTMLとして保存する実験

Excel でhtmlで保存する操作をマクロに記録して利用した。

 

Sub 選択範囲HTML保存()
'
'選択範囲をHTMLで保存する
'
Dim saveDir_name As String '保存ディレクトリ、ファイル名

saveDir_name = "D:\nokie_bk\office\selectionHTML.html"
'

    ActiveWorkbook.PublishObjects.Add(xlSourceRange, saveDir_name, ActiveSheet.name, Selection.Address, xlHtmlStatic, "", "").Publish _
        (True)
End Sub

ソース

 

 

タグ：Excel2000 VBA