回答編集履歴

1

変数 folderPath への代入部分がテストコードのままになっていたので修正しました。

2025/02/05 07:44

投稿

sk.exe
sk.exe

スコア1016

test CHANGED
@@ -33,8 +33,7 @@
33
33
  Debug.Print dateToFind
34
34
 
35
35
  '日報ブックが保存されているフォルダのパスを指定
36
- folderPath = wbSummary.Path & "\CC商品別売上日報 生データ"
37
- ' folderPath = "H:\XXXXX\★AAAAAAA\BBBBBBBB\CC商品別売上日報 生データ"
36
+ folderPath = "H:\XXXXX\★AAAAAAA\BBBBBBBB\CC商品別売上日報 生データ"
38
37
  Debug.Print folderPath
39
38
 
40
39
  'フォルダが見つからなかった場合