[Hỏi] Chỉnh border cho file xuất ra PDF (1 người xem)

[lyly2626]

Anh chị cho em hỏi, làm sao để giữ nguyên định dạng của bảng sau khi xuất qua file PDF ạ


Chúng bao gồm: đường viền (border), các dòng ngang dọc (line) của bảng.

Có liên quan tới đoạn code em dùng dưới đây không ạ:

Sub export_report()
Dim tenfileStr As String, pathStr As String
tenfileStr = Format(Day(Now), "00") & "-" & Format(Month(Now), "00") & "-" & Format(Year(Now), "00")
pathStr = Range("P2").Value
Worksheets("Sheet1").ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:=pathStr & tenfileStr & ".pdf", _
OpenAfterPublish:=True
End Sub

Hình ảnh excel

Hình ảnh sau khi xuất qua file PDF (các line bị tô đậm 1 cách ngớ ngẩn, quá xấu )


Các anh/chị thử download ảnh để coi hình lớn hơn mới thấy rõ được ạ