回答編集履歴
1
固定パスを変数にするのを忘れたため
test
CHANGED
@@ -62,11 +62,7 @@
|
|
62
62
|
|
63
63
|
index = InStrRev(FolderName, "\") ' ← 後ろから\を探し、その位置をindexに返す index=30
|
64
64
|
|
65
|
-
|
66
|
-
|
67
|
-
FolderName = Left(
|
65
|
+
FolderName = Left(FolderName , index) '←フォルダパスを抜き出す 左から30文字をFileNameにセット
|
68
|
-
|
69
|
-
' 123456789012345678901234567 8 9 0 左から30文字をFileNameにセット
|
70
66
|
|
71
67
|
'FolderName = "C:\Users*\Documents\macro練習用\"
|
72
68
|
|