Сейчас я делаю все при помощи Do  делаю проверку на имя файла N=N+1 если такой файл есть прибавляю единицу и произвожу опять проверку и т.д. когда определяется, что файла нет произвожу копирование с именем + N.

Есть ли какой-то может готовый метод благодаря которому можно делать как в винде? А то так когда перебираешь все файлы в папке очень медленно получается.