Xin giúp tạo file .pdf tự động với VBA

[nguyencanhhoa1986]

Xin trợ giúp code VBA trong excel để tạo các file .pdf tự động với tên file và đường dẫn đọc từ file excel có sẵn

 

[BuiQuangThuan]

Xin trợ giúp code VBA trong excel để tạo các file .pdf tự động với tên file và đường dẫn đọc từ file excel có sẵn

Thế cái file nguồn để tạo ra file PDF là cái nào? Mặt mũi nó ra làm sao á?

 

[Tuan.DNa]

Mình dùng công cụ Chat GPT viết code thì ra như vậy. Bạn tùy biến theo ý mình nhé.

Sub ExportToPDF()

Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("Sheet1") ' thay đổi tên sheet nếu cần

Dim pdfFilePath As String
pdfFilePath = "C:\Reports\Report.pdf" ' đường dẫn và tên file PDF

Dim pdfRange As Range
Set pdfRange = ws.Range("A1:E10") ' thay đổi phạm vi cần chọn

ws.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfFilePath, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True, _
From:=pdfRange.Address ' chọn phạm vi cần xuất sang PDF

End Sub

Bạn có thể thay đổi tên sheet, đường dẫn, tên file PDF, và phạm vi cần chọn để phù hợp với nhu cầu của mình.

 

[nguyencanhhoa1986]

Thế cái file nguồn để tạo ra file PDF là cái nào? Mặt mũi nó ra làm sao á?

Chỉ cần tạo file rỗng không cần dữ liệu hoặc dữ liệu bất kỳ cũng được bạn à