Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

22218 / 76734

←次へ　｜　前へ→


	【59899】Re:PDFのウィンドウサイズ変更

Yuki - 09/1/16(金) 14:22 -


	引用なし

	パスワード

▼KAO さん：

>下記のLoopのところで、ずーっとLoopしている状態になってしまい、処理がうまくできません。
>何か原因がわかりません。
>下記のコードは、何の処理をしているコードでしょうか？
>
>＞lngTaskId = Shell(strEXE & strPDF, 3)
>＞　　'　　' 起動待ち
>＞　　On Error Resume Next
>＞　　Do
>＞　　　　DoEvents
>＞　　　　Err.Clear
>＞　　　　AppActivate lngTaskId
>＞　　Loop Until Err.Number = 0

このところはPDFファイルがきちんと表示されるまで待つというところです。
この部分をコメントにして (行頭に'を付ける)

Application.Wait Now + TimeValue("0:00:03")
この一行を入れてみて下さい。強制的に3秒待ちます。
しかし、何でそうなるのかな

2 hits

▼

【59860】PDFのウィンドウサイズ変更 KAO 09/1/14(水) 11:55