テーブル名は「テーブル1[#すべて]」のように指定するとヘッダーも含め出力できます。 「テーブル1」だけだと、Bodyしか出力されません。 Public Sub PublishHtmlTable() With ActiveWorkbook.PublishObjects.Add(xlSourceRange, _ "C:\Users\【User名】\Des…