Nhúng hàng trăm, thậm chí hàng ngàn tệp pdf trong excel?

Sẽ có thể và hiệu quả khi chèn - đối tượng khoảng 1000 tệp PDF vào một tài liệu excel, hoặc nó sẽ bắt đầu chạy rất chậm / các vấn đề khác?

microsoft-excel microsoft-excel-2010

— Paze
nguồn

Vấn đề gì bạn đang cố gắng giải quyết chính xác?

— Ramhound

Tôi có khoảng 1000 tệp PDF được gửi trên ổ đĩa mạng và tôi đã liên kết chúng với tài liệu excel của mình nhưng vì một số lý do, excel tiếp tục thay đổi đường dẫn. Xem: superuser.com/questions/783347/ ( Vì vậy, tôi đang cố gắng tìm giải pháp khác. Điều gì sẽ là cách tốt nhất để liên kết 1000 tệp PDF với một tài liệu excel để bạn có thể nhấp vào một liên kết trong excel để mở một tệp?

— Paze

Tôi không thể nghĩ ra một lý do mà excel nên thay đổi đường dẫn tệp. Nếu bạn muốn một cách để cập nhật các siêu liên kết nhanh hơn, bạn có thể sử dụng một cái gì đó như thế này.

Bạn chỉ định một thư mục tệp và nó giả sử tất cả các giá trị trong cột A là tên pdf (không có .pdf ở cuối) và nó thêm tất cả các siêu liên kết.

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

— gtwebb
nguồn