Будет ли возможно и эффективно вставить объект около 1000 PDF-файлов в документ Excel или он начнет работать очень медленно / другие проблемы?
1 ответ
0
Я не могу придумать причину, по которой Excel должен изменить путь к файлу. Если вы хотите быстрее обновить гиперссылки, вы можете использовать что-то вроде этого.
Вы указываете каталог файлов, и он предполагает, что все значения в столбце A являются именами pdf (без .pdf в конце), и добавляет все гиперссылки.
Sub add_hypers()
Dim last As Integer
Dim x As Integer
Dim name As String
Dim directory As String
Dim file As String
directory = "C:\"
last = Data.Range("A65536").End(xlUp).Row
For x = last To 2 Step -1
name = Data.Range("A" & x).Value
file = directory & name & ".pdf"
ActiveSheet.Hyperlinks.Add Anchor:=Data.Range("A" & x), Address:=file
Next
End Sub