ActiveX のセキュリティ障害で発生している問題は、Web ページに Excel を埋め込んでいるためだと思います。Excel の publish メソッドを使用してシートを HTML として発行することにより、ワークシートを印刷できるはずです。これを使用して、電子メールの HTML を作成します。
Dim rngeTableRange As Range
Dim lsTableFileName As String
lsTableFileName = <filepath and name for HTML output as string>
Set rngeTableRange = ActiveSheet.UsedRange
ActiveWorkbook.PublishObjects.Add(xlSourceRange, lsTableFileName, _
rngeTableRange.Parent.Name, rngeTableRange.Address, xlHtmlStatic).Publish True
印刷物をスプレッドシートのように見せたい場合は、ワークシートを公開する前に罫線を追加できます。次の VBA コードは、各セルの周りに境界線を配置します。
With ActiveSheet.UsedRange.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Weight = xlThin
End With
With ActiveSheet.UsedRange.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Weight = xlThin
End With
With ActiveSheet.UsedRange.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
End With
With ActiveSheet.UsedRange.Borders(xlEdgeRight)
.LineStyle = xlContinuous
.Weight = xlThin
End With
With ActiveSheet.UsedRange.Borders(xlInsideVertical)
.LineStyle = xlContinuous
.Weight = xlThin
End With
With ActiveSheet.UsedRange.Borders(xlInsideHorizontal)
.LineStyle = xlContinuous
.Weight = xlThin
End With
結果は、セキュリティ警告につながらないスプレッドシートの HTML 画像である必要があり、印刷可能であると思います。