|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
17.01.2022, 20:48 | #1 |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
VBA Создать папку с именем файла и переместить по списку
Привет Всем!
Рад снова обратиться к вам за помощью... Задача: Исходная позиция: Столбец A, B Желаемая позиция: Столбец C Для файлов в папке нужно создать папку по заданному названию (столбец H) и переместить туда файлы заданные в столбце B *** В столбце H названия могут повторяться *** Имена файлов не обязательно равны имени новой папки Заранее огромное спасибо за помощь!
Jungo must die!!! (C) Bill Gates.
|
17.01.2022, 22:14 | #2 |
2 the Nation Glory
Старожил
Регистрация: 27.05.2014
Сообщений: 3,289
|
тоесть в папке C:\Users\Alexg\Desktop\VBA\ALEX надо создать 21 подпапку с именами из столбца Н. И в каждую из подпапок скопировать 21 файл с именами столбца В из папки C:\Users\Alexg\Desktop\VBA итого надо создать 441 файл и 21 папку?
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы. |
18.01.2022, 12:11 | #3 | |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Цитата:
Нужно создать 21 подпапку с именами из столбца Н. Файлы из папки C:\Users\Alexg\Desktop\VBA перенести по заданным подпапкам (которые мы только что создали) строго по столбцу C (то-есть каждый файл в столбце B в подпапку в столбце C).
Jungo must die!!! (C) Bill Gates.
|
|
18.01.2022, 12:23 | #4 |
2 the Nation Glory
Старожил
Регистрация: 27.05.2014
Сообщений: 3,289
|
Так с чем помочь-то или надо все сделать вместо Вас?
1. Создание папки: https://best-excel-tutorial.com/57-v...r-in-excel-vba 2. Копирование файлов: https://www.rondebruin.nl/win/s3/win026.htm комбинируйте.
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы. |
18.01.2022, 19:49 | #5 | ||
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Цитата:
Цитата:
Файлы любых форматов строго по столбцу B
Jungo must die!!! (C) Bill Gates.
|
||
19.01.2022, 09:32 | #6 |
2 the Nation Glory
Старожил
Регистрация: 27.05.2014
Сообщений: 3,289
|
Такое только Чак Норрис умеет.
Код:
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы. Последний раз редактировалось Aleksandr H.; 19.01.2022 в 09:35. |
19.01.2022, 14:14 | #7 |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Убил )))))
Огромное спасибо за помощь и юмор. Буду тестировать.
Jungo must die!!! (C) Bill Gates.
|
19.01.2022, 14:53 | #8 | |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Цитата:
Одно "но. . . " А если в списке есть файл, которого не существует, можно просто пропустить и потом выдать error каких файлов не было?
Jungo must die!!! (C) Bill Gates.
|
|
19.01.2022, 16:31 | #9 |
2 the Nation Glory
Старожил
Регистрация: 27.05.2014
Сообщений: 3,289
|
it's your hometask
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Копирование файла в другую папку под новым именем в процессе выполнения макроса | artyom2104 | Microsoft Office Excel | 5 | 16.05.2018 10:18 |
File1 .Дана строка S. Если S является допустимым именем файла, то создать пустой файл с этим именем и вывести True. | Евгений1240 | Помощь студентам | 0 | 24.04.2012 14:26 |
Сохранить текстовый файл в указанную папку с заданным именем (Delphi) | winwirus | Помощь студентам | 3 | 26.09.2011 20:14 |
Excel (VBA) создать папку | vik85 | Помощь студентам | 1 | 31.01.2010 13:17 |
Создать ярлык => выбор файла => Открыть файл как папку??? | Alex Cones | Windows | 6 | 05.10.2009 10:47 |