みんなの「教えて(疑問・質問)」にみんなで「答える」Q&Aコミュニティ

こんにちはゲストさん。会員登録(無料)して質問・回答してみよう!

解決済みの質問

Excel2010VBAから Wordを開く

お世話になります。
半年前に質問し、一時は解決したつもりでしたがまだ未解決な為、再質問しますy。

Excel2003VBAで、次の様にWordファイルをオープンしていました。
Dim boReadOnly As Boolean
Dim objWord As Word.Application

boReadOnly = True
Set objWord = CreateObject("Word.Application")
With objWord
.Documents.Open toFullName, ReadOnly:=boReadOnly
.Visible = True
End With

これを、Excel2010VBA(Window7、主メモリ4G)へ移植すると、Wordは立ち上がりますが、文章は開いてくれません。(これが問題点です。)

暫定として、.Visibleの次行に、
  .Activate
を追加しています。これを行なうと、Startアイコンの→横に、Wordアイコンが点滅するので、
Wordがオープンした事はわかります。

また、VBAのソースをいじっている時に実行すると、Word文章も正しく開ける場合もあります!!
この現象はExeclVBAを再起動すると、元のWordだけ立ち上がる現象に戻ってしまいます。
どこか手順または実行条件が違う様な気がします。


Word文章を正しく開きたいのですが、御教示よろしくお願いします。

投稿日時 - 2011-11-28 20:41:26

QNo.7159960

すぐに回答ほしいです

質問者が選んだベストアンサー

toFullName を指定するコードが書かれていないため、
提示のコードでは、Excel2003VBA でも動きません。

toFullName を指定するコードに問題があるのでは?

投稿日時 - 2011-12-07 18:59:13

お礼

質問して2週間経過のアナウンスメールが来てしまいました。
ご回答ありがとうございます。
toFullNameの内容が正しい事は確認していますが、しっくりしません。

文章なしのWordが立ち上がります。スタート横のWをクリックすると指定文書を開く事が出来ます。
VBEでこの辺りのソースを色々変更していると、一発で文書が開けますが、Excelを保存して再立ち上げしてWordを呼び出すと、元通りの文章なしのWordしか開けません。

見た目は、Execlの表示が居座っていると、Wordが文章を読み込めない様にも見えます。

作成したVBAソースのどこかに不具合がある可能性もあるのですが、
どうも、Execlの表示を最小化して、Wordを呼び出すと、一発で文書が開ける様で、この方向で検討中ですが、根本的な解決方法ではないので、困っています。

投稿日時 - 2011-12-13 21:11:28

このQ&Aは役に立ちましたか?

0人が「このQ&Aが役に立った」と投票しています

回答(1)

あなたにオススメの質問