1

Я создал диаграмму Ганта, чтобы не отставать от проекта. Каждое задание имеет от 50 до 100 внешних файлов (word, excel, PDF). Мне нужна ссылка на каждый файл в книге. Загрузка каждого файла по отдельности в отдельных ячейках или в окне списка займет несколько часов.

Существуют ли варианты перетаскивания нескольких файлов в список или поле со списком? Или каким-либо другим способом я могу импортировать все файлы одновременно? Любая помощь очень ценится!

1 ответ1

1

В папке, содержащей ваши 50 внешних файлов, создайте командный файл, например:

dir/s/b *.doc *.pdf *.xls* > files.txt

Запустите пакетный файл, чтобы получить список документов. Вставьте этот список в Excel. Каждая строка окажется в отдельном ряду. Убирайся по мере необходимости.

Как только все имена ваших файлов будут в списке и будут указаны с полным путем, выберите первую ячейку и запустите этот макрос, чтобы сделать ссылки на имена:

Sub Macro2()

Do While (Selection.Value <> "")
   Path = Selection.Value
   ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=Path, TextToDisplay:=Path

   ActiveCell.Offset(1, 0).Range("A1").Select
   Loop
End Sub

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .