Приветствую всех!
Открыл для себя облако OneDrive от Майкрософта. Работает с Офис 2013. Работаем несколько человек с одними файлами. Плюс в том, что можно открывать прямо из облака полноценный Эксель файл (не как в Гугле) и использовать все преимущества экселя.
Проблема возникла, когда решили целиком перейти в OneDrive и использовать все макросные наработки. Проблема с переборкой файлов в папке.
Код:
ПутьКпапке = ThisWorkbook.Path & "/"
s = Dir(ПутьКпапке & "*.*")
Do While s <> ""
s = Dir
Loop
не работает, выдавая ошибку: Bad file name or number на строке s = Dir(ПутьКпапке & "*.*")
ПутьКпапке выглядит следующим образом: https://d.docs.live.net/881c21f........13c/ОблПредприятия/ЭнергоТехСервис 2015/
Вместо точек там всякие другие символы и цифры.
Кто может уже работал в этой системе?
Или это какая-то банальная ошибка в написании?
Может, есть другие способы перебирать файлы в папке?