0322デフォルトの名無しさん (ワッチョイ 2735-cT+3)
2019/02/19(火) 15:44:15.07ID:XTzrMDQC0かなりめんどくさいことをしている気がする
やりたい事はこれじゃないんじゃないか
Private Sub UserForm_activate()
'多分一回呼ばないとダメ
WebBrowser1.Navigate ("https://example.com")
End Sub
Private Sub UserForm_Click()
html = "<div>foo</div>"
WebBrowser1.Document.body.InnerHtml = html
End Sub