回答編集履歴

1

xail2222 さんからのご指摘を反映

2022/05/17 21:43

投稿

KOZ6.0
KOZ6.0

スコア2628

test CHANGED
@@ -4,14 +4,9 @@
4
4
  'PDFファイル名を取得(拡張子などをワイルドカードで検索して変数へ取込む)
5
5
  printFileName = Dir(printFolderPath & "*")
6
6
  ```
7
- printFolderPath にファイル完全名が入っているか確認してください。
7
+ printFolderPath に想定した文字列が入っているか確認してください。
8
8
 
9
- 話は変わりますが、Dir 関数ファイルの存在チェックを行うのは、まりい方法ではありません
9
+ 話は変わりますが、Dir 関数を実行すると、ヒットするファイルあいはフォルダがる場合、フォルダが開いたままになりま
10
- というのはファイルが存在た場合、フォルダを開いたまにしてしまうからです。
10
+ 空文字が返ってくるまで引数なで Dir 関数を呼び出すとフォルダが閉じられます。
11
- また、ファイルでなく、フォルダが存在していてもヒットした形になるので、GetAttr 関数で取得した属性に vbDirectory フラグが立っていないことも確認しなければなりません。
12
11
 
13
- Microsoft Scripting Runtime を参照設定し、Scripting.FileSystemObject オブジェクトの FileExists メソッドを使うことをお勧めす。
14
-
15
- 「FileExists メソッド」
16
- [https://docs.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/fileexists-method](https://docs.microsoft.com/ja-jp/office/vba/language/reference/user-interface-help/fileexists-method)
17
-
12
+ また、ファイルでなく、フォルダが存在ていてもヒットした形になるのでGetAttr 関数で取得した属性に vbDirectory フラグが立っていないことも確認たほうが良いです。