Save as Excel thành PDF với file kích thước nhỏ

[stao]

Khi lưu 1 page trên exel thành pdf:
- Lưu qua máy in thì file có dung lượng 100KB
- Lưu qua câu lệnh VBA: ExportAsFixedFormat thì dung lượng là 300KB
Vậy có cách nào để dùng VBA mà dung lượng file pdf nhỏ như cách dùng máy in không

Cảm ơn.

 

[befaint]

15 ký tự + 1 .

 

[stao]

15 ký tự + 1 .

View attachment 257076

À mình có chỉnh cách này, vẫn còn dung lượng khá lớn so với cách PrintOut

 

[saobekhonglac]

Khi lưu 1 page trên exel thành pdf:
- Lưu qua máy in thì file có dung lượng 100KB
- Lưu qua câu lệnh VBA: ExportAsFixedFormat thì dung lượng là 300KB
Vậy có cách nào để dùng VBA mà dung lượng file pdf nhỏ như cách dùng máy in không

Cảm ơn.

Mình lưu chưa file nào quá 150k, có những file tới 7 trang A4

 

[befaint]

À mình có chỉnh cách này, vẫn còn dung lượng khá lớn so với cách PrintOut

Mình gửi file đó lên đây đi.

 

[batman1]

À mình có chỉnh cách này, vẫn còn dung lượng khá lớn so với cách PrintOut

Ngoài "Minimum size" bạn thử làm thêm: nhấn nút Options -> trong cửa sổ Options bỏ chọn cả 3 mục trong khung đỏ.



Nếu thao tác bằng code thì tôi thấy dùng

ThisWorkbook.ExportAsFixedFormat xlTypePDF, "d:\hichic.pdf", xlQualityMinimum

thì dung lượng cũng không hơn Print là mấy.

 

[stao]

File 141KB là lưu bằng print out, file 478KB là lưu bằng ExportAsFixedFormat
Mình cần thao tác trên nhiều file nên mới tìm tới giải pháp VBA

 

[befaint]

Mình

Mình gửi file đó lên đây đi.