|
Excelにてで画像挿入をActiveXとOLEオブジェクトの2パターンを作成し正常に動くのを確認して、Notesへ盛り込んだところうまく動きません。
動作環境:
Lotus Notes 7.0.3
Excel 2003と2007で別PCで確認
・ActiveXの場合
NotesのLotus Scriptにて。
Dim obj As Variant
Set obj = wSheet.OLEObjects.Add("Forms.Image.1", False, False, Left位置, Top位置, 幅, 高さ)
obj.Object.Picture = LoadPicture(ファイル名)
このスクリプトライブラリを保存すると、 LoadPicture が宣言されていない変数で保存できません。
保存できなかったのでOLEオブジェクトにしてみましたが、こちらは実行エラーでどちらも動かせない状態です。
・OLEオブジェクトの場合
ExcelのBVA:
Dim obj As OLEObject
Set obj = wSheet.OLEObjects.Add(Filename:=ファイル名, Link:=False, DisplayAsIcon:=False, Left:=Left位置, Top:=Top位置, Width:=幅, Height:=高さ)
NotesのLotus Script
Dim obj As Variant
Set obj = wSheet.OLEObjects.Add(ファイル名, False, False, Left位置, Top位置, 幅, 高さ)
スクリプトライブラリの保存はできましたが、実行すると下記エラーがでます。
---------------------------
ErrorNo.213: Microsoft Office Excel: OLEObjects クラスの Add プロパティを取得できません。
---------------------------
NotesではOLEObjects は使えないのでしょうか?それとも別の問題でしょうか?
アドバイスよろしくお願いします。
(別サイト「Notes Q&A」でも質問しています)
|
|