質問編集履歴

1

問題点について飯米したことが在り追記しました。

2021/01/30 13:46

投稿

ice930
ice930

スコア99

test CHANGED
File without changes
test CHANGED
@@ -39,3 +39,23 @@
39
39
  当方、VBAは触っていましたが、ワードについてのコードはこれが初めてで、基本的なところが抜けている場合もございますが、その部分も含めご指摘いただければ嬉しく思います。
40
40
 
41
41
  よろしくお願いします。
42
+
43
+
44
+
45
+ 〈追記〉
46
+
47
+ Set wdApp = CreateObject("Word.Application")
48
+
49
+ wdApp.Visible = True
50
+
51
+ この2行に時間がかかり、ワードが表示される(起動する)前にページ設定がを行ってしまう為、エラーが起きてしまう可能性が考えられます。(ステップインでゆっくり進み、ワードが立ち上がった後に進んで行くと、問題なく進むので、上記の理由からのエラーではないかと考えました。)
52
+
53
+
54
+
55
+ ワードが立ち上がったら、次の行に進むような方法はないでしょうか。
56
+
57
+ 専用のメソッドが有ればうれしいですが、そうで無くとも構いません。
58
+
59
+ 上記の理由からではないかもしれませんが、何か知恵をおかしいただければ幸いです。
60
+
61
+ よろしくお願いします。