Переименование листов из книг на основе данных ячейки

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по VBA » Переименование листов из книг на основе данных ячейки (Макросы/Sub)

EBIT

Дата: Вторник, 11.07.2017, 20:51 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1

Репутация: -6 ±

Замечаний: 0% ±

Excel 2010

Добрый вечер.

Задача. Написать макрос, который автоматически переименовывает листы книг из нескольких книг на основе ячеек таблицы.
Файл-пример приведен во вложении. Есть 4000 excel файлов с разным именованием листов книг. Я создаю структуру файлов книг и листов в таблице на основе макроса, но не знаю как реализовать рекурсивное переименование листов книг на основе критерия в таблице. Критерий следующий.

В столбце G указаны пути к файлам. Столбец B содержит имена листов в соответствии с именем файла. Некоторые файлы содержат более одного листа.
Листы, названия которых должны быть переименованы подсвечены желтым. Например, лист в именем "false_sample_ad" должен быть переименован в "true_sample". НО. Есть листы, которые называются "false_sample 2017", поэтому они должны быть переименованы в "true_sample_2"

Есть ли какие-то идеи? Сам процесс тяжело проделать вручную, так как файлов очень много.

Заранее благодарен.