|
shousuke さん、かいとさん、こんにちは。かみちゃん です。
> Private Sub CmbUPDATE_Click()
> Set wpage = ActiveWorkbook.PublishObjects.Add _
> (SourceType:=xlSourceRange, _
> Filename:="C:\Documents and Settings\ (省略)\graph1.htm", _
> Sheet:="sheet1", _
> Source:="I2:V44", _
> Title:="GRAPH").wpage.Publish(True)
> End Sub
私の環境は、WindowsXP HomeEdition、Excel2002ですが、shousuke さんのこのコードでは、かいとさんがおっしゃている「コンパイル エラー メソッドまたはデータメンバが見つかりません。」となります。
Private Sub CmbUPDATE_Click()
Set wpage = ActiveWorkbook.PublishObjects.Add _
(SourceType:=xlSourceRange, _
Filename:="C:\Documents and Settings\ (省略)\graph1.htm", _
Sheet:="sheet1", _
Source:="I2:V44", _
Title:="GRAPH")
wPage.Publish True
End Sub
とすると、私の環境ではうまく動くようです。
> ちなみに前回の段階で出ていたエラーは
>
> "実行時エラー ’1004':
> アプリケーション定義またはオブジェクト定義のエラーです。"
かいとさん、こういう情報は、一番最初に出してください。
それと、このエラーは
>最後の "wPage.Publish True"でエラーがでます。
ではなく
Set wpage = ActiveWorkbook.PublishObjects.Add _
〜
Title:="GRAPH")
で出ていませんか?
Filename:="C:\Documents and Settings\ (省略)\graph1.htm", _
が、存在しないパス(フルパスのファイル名)を指定していたり
Sheet:="sheet1", _
が、存在しない存在しないシートを指定していたりすると、
このエラーが私の環境では出ました。
|
|