Нужно написать программу или макрос VBA

Нужно написать программу или макрос VBA

ко всем файлам (*.doc, *.docx), находящимся в определенной папке добавлялся в название уникальный номер фала (1,2,3 и т.д.), после этого необходимо извлечь название файла, текст на странице под номером 2 (это оглавление работы), дату изменения, кол-во страниц в файле и все эти данные поместить в эксель в таблицу

нужно чтоб обрабатывалась не только текущая папка, но и все подпапки 

смысл в том, чтобы создать базу студ работ и потом с экселевского файла можно было закинуть на сайт для продажи

пример выполнения
1. в папке N лежит 4 файла с названиями (курсовая A, курсовая B, диплом C, диплом D)
2. Они переименовываются в (1 курсовая A, 2 курсовая B, 3 диплом C, 4 диплом D)
3. Далее в таблицу эксель извлекаются данные с этих файлов 
A1 – название файла
B1 – оглавление (то есть содержимое страницы под номером 2) 
C1 – дата изменения 
D1 – кол-во страниц (просто цифра)

цена? сроки?