Excel2010上でWorkbook.PublishObjects を使って静的htmlの生成をしていますが、Titleタグがうまく設定できません。


With ActiveWorkbook.PublishObjects.Add(xlSourceSheet, _
save_filename$, "出力シート名", "", xlHtmlStatic, _
div_id$, html_title$)
.Publish (True)
.AutoRepublish = False
End With

のようにすると、htmlのタイトル<title>は確かに設定されるのですが、なぜかhtmlのbody本文中にも
<body>
<!--[if !excel]>  <![endif]-->
<!--次の情報は、Excel の Web ページとして発行ウィザードで生成されました。-->
<!--同じアイテムが Excel から再発行されるとき、DIV タグ間のすべての情報が置き換えられます。-->
<!----------------------------->
<!--Excel の Web ページとして発行 ウィザードのアウトプットの始まり-->
<!----------------------------->

<div id="xxxxxxxxxxx" align=center x:publishsource="Excel">
<h1 style='color:black;font-family:"MS Pゴシック";font-size:14.0pt;font-weight:
800;font-style:normal'>xxxxxxxxxxxxxxx</h1>

このように、h1としてデカデカとタイトルが表示されてしまいます。<title>だけ設定して本文は勝手に書き換えない設定はないのでしょうか。

回答の条件
  • 1人5回まで
  • 13歳以上
  • 登録:2011/09/05 23:00:44
  • 終了:2011/09/09 01:20:09

ベストアンサー

id:mdfmk No.1

mdfmk回答回数981ベストアンサー獲得回数1972011/09/07 18:15:17

ポイント200pt

PublishObjects.Add メソッド (Microsoft.Office.Interop.Excel)

titleに値を入れると自動的にh1タグで囲まれたタイトルを生成する仕様なようなので、

ここは省略して生成し、後から変更を加えるようにしてはいかがでしょうか。


もしくは予めhtmlファイルを生成しておいて、そこに追加するかですね。

VBAでHTML(テキスト)の編集 --Access Club Access 初・中級者 FORUM--

三流君VBA:Excel VBA テキストファイルで.htmlの雛型を作成する

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません