VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2005/06/27(Mon) 21:00
投稿者ken
Eメール
URL
タイトルEXCEL内のOLEオブジェクト操作

こんばんは。
WorkSheetにリッチテキスト文章をOLEオブジェクトとして挿入し、
挿入したオブジェクトの段落設定等を行ないたいのですが、「objectプロパティが取得できません」
とエラーが発生します。

-------- ソース ---------------
    Dim obj As OLEObject
    Dim wdDoc As Word.Document
    dim xlSheet as Excel.WorkSheet

    (省略)
    'Word文章を挿入
    xlSheet.OLEObjects.Add , "c:\aaa.rtf"  'リッチテキストファイルをEXCELに挿入
    xlSheet.OLEObjects.Border.LineStyle = xlLineStyleNone
    Set wdDoc = xlSheet.OLEObjects(1).object '現状は1個のみのため固定にしてます。
   ↑ココでエラー発生。

  環境はVB6.0 SP5 office2003 OS:XPです。
    しかし同一コードを、VB6.0 SP5 OS:XP office2000 で実行しますとエラーは発生しません。
  EXCEL(office2003)のVBAでもやりましたがエラーは発生しませんでした。
  何故でしょうか?

  エラーの対象方法ご存知の方いらっしゃいましたら、宜しくお願い致します。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -