Всем Мяв!
Имеем папку, в которой находятся файл с макросом, и 2 вложенные папки
Запускаем макрос
Получаем ответ
.
..
Г
свод.xlsm
Ф
Где он берет два первых значения?
Я бы еще понял отсутствующий ответ ~$свод.xlsm, но "." и ".."?
Имеем папку, в которой находятся файл с макросом, и 2 вложенные папки
Запускаем макрос
Код |
---|
Sub q() Dim sFolderStart$, sFolder$, sFile$ sFolderStart = ThisWorkbook.Path & Application.PathSeparator sFolder = Dir(sFolderStart, vbDirectory) Do Debug.Print sFolder sFolder = Dir(, vbDirectory) DoEvents Loop Until sFolder = "" End Sub |
Получаем ответ
.
..
Г
свод.xlsm
Ф
Где он берет два первых значения?
Я бы еще понял отсутствующий ответ ~$свод.xlsm, но "." и ".."?