excel - パス名の変数とパスが見つからないというエラーの取得

Question

髪を抜いています。mkdirは年（整数）では機能しますが、月（文字列）が追加された場合は機能しません。

year = 2013
month = MonthName(1)

'I have also tried just putting "January" in there as well

これは機能します：

Path1 = "\\TEST\" & year & "\" 

しかし、これはしません：

Path1 = "\\TEST\" & year & "\" & month & "\"

提案？ありがとう！

最終修正：

Path1を次のように分割します。

Path1: "\\TEST\" & year & "\"

Path2:  "\\TEST\" & year & "\" & month & "\"

チェック付き：

If Len(Dir(Path1, vbDirectory)) = 0 Then
        MkDir Path1
End If
If Len(Dir(Path2, vbDirectory)) = 0 Then
        MkDir Path2
End If

Answer 1

すでに存在しない限り、 MkDir"\\TEST\" & year & "\" & month & "\"を介して作成することはできません。"\\TEST\" & year & "\"

したがって、投稿されたコードを拡張すると、次のようになります。

Path1 = "\\TEST\" & year & "\"
If DIR$(Path1, vbDirectory) <> "" then mkdir Path1
Path1 = "\\TEST\" & year & "\" & month & "\"
If DIR$(Path1, vbDirectory) <> "" then mkdir Path1