Создать каталог без сообщения об ошибке компиляции

Question

Пожалуйста, помогите.Я довольно новый.Я пытаюсь создать папку, используя даты, и получил сообщение об ошибке компиляции «неправильное количество аргументов или неправильное назначение свойств».Код работал отлично в течение месяца, но не больше.

Sub Test()

MkDir "\\AD.TEST.COM\nas\Team-AB-TEST\TEST FOLDER\TEST FOLDER \" & Format(Date, "yyyy") & " Email Tracking\" & Format(Date, "mm.dd.yy") & "\Attach\"

End Sub

Answer 1

Ваш код отлично компилируется.

Но когда вы добавите это рядом с вашим кодом:

Function Format(s As String)
Format = "tralala"
End Function

Тогда он больше не будет работать.

Можете ли выпроверить, что у вас где-то не определена Format() функция?