Căn chỉnh lề in chuẩn trong excel

[LikeIt]

Kính gửi các anh chị trong GPE,

Không hiểu sao em căn chỉnh trên máy tính của em báo cáo trong excel rất chuẩn, khi preview lên thấy cân đối đúng theo yêu cầu, nhưng khi in ra từ máy in HP LaserJet1320 thì lề bên trái bị thụt vào lề rất lớn còn lề bên phải thì không sao. Rất mong có anh chị nào có kinh nghiệm hướng dẫn giúp em. Có thể có một điểm gì đó trong căn chỉnh tại trên máy tính của em có vấn đề, vì em thấy cũng máy in đó, máy của một bạn đồng nghiệp in ra rất cân bằng.

Chân thành cảm ơn.
NHT

 

[tedaynui]

Bạn thử vào Control Panel, mở Printers and Faxs. Sau đó click phải lên biểu tượng máy in HP LJ1320 để mở Properties. Trong Properties /Printing Preferences bạn hãy chọn lại khổ giấy mặc định là A4 và OK

TDN

 

[anhtuan1066]

Món này anh cũng đang bị, chỉnh "tá lã" trên file vẫn ko ăn thua.. Đễ ý trên máy in ngay chổ đặt giấy có các dấu hiệu canh giấy đấy, em xem lại đi... Còn nếu như vẫn ko dc thì chỉ còn có nước canh bằng tay thôi.. nghĩa là chỉnh giấy trực tiếp trong khay.. hoặc chỉnh lại trong file, chọn lề trái ít hơn lề phải
ANH TUẤN

 

[feelingyes]

Em cũng bị như vậy nhưng không được, điều ngạc nhiên là có file bị, nhưng có file không bị (trong điều kiện căn chỉnh và view lên như nhau)

 

[DOSNET]

Nếu chỉnh tất cả rồi không được thì chỉ còn một nguyên nhân là drive của máy in do XP tự nhận không ...ngon lành như của nhà sx máy in. Tôi đã gặp trường hợp phải chỉnh...mò với máy in Canon 3200. Cài lại drive chính hãng lấy từ trang Wed của Canon là OK. Bạn nghiên cứu thử

 

[tedaynui]

Mình thường gặp trường hợp canh chỉnh trên máy rất vừa ý nhưng khi in ra thì thừa đầu thừa đuôi. Bởi lẽ khi setup driver máy in thì giá trị mặc định khổ giấy là Letter nên vào Properties chỉnh lại khổ giấy mặc định là A4 là khắc phục được. Các bạn thử xem, biết đâu hên thì sao, hi hi

TDN

 

[anhtuan1066]

Tôi ko nghĩ là do Driver đâu.. Vì trong xưởng tôi cũng có 1 máy in màu đang bị tình trạng này... Driver zin từ nhà sx đấy! Mọi người đã làm hết các kiểu: Letter, A4.. ôi thôi ko thiếu thứ gì.. vẫn ko ăn thua, cuối cùng là.. chỉnh bằng tay!

 

[salam]

Em cũng bị tình trạng đó chỉnh tá lả không được, quay về thử thằng office 2000 thì ok, không hiểu tại sao nữa. Bây giờ em chỉnh ở khay máy in.

 

[tedaynui]

Anh Tuấn chỉnh lại khổ giấy A4 trong Propeties của máy in hay là trong File - Page setup ? Nếu chỉnh trong File - Page Setup thì hỏng có "ép phê" đâu nha.

 

[DOSNET]

Chỉnh trong Propeties của máy invàchỉnh ở File\Page Setup\options thực chất chỉ là 1, nhưng nếu bác chỉnh trong Propeties của máy in và đặt là default thì các lần sau mình không phải đế ý đến nó nữa bác ạ !

 

[anhtuan1066]

Anh Tuấn chỉnh lại khổ giấy A4 trong Propeties của máy in hay là trong File - Page setup ? Nếu chỉnh trong File - Page Setup thì hỏng có "ép phê" đâu nha.

Trong cả 2 chổ

 

[LikeIt]

Cảm ơn các anh, sau một loạt các thử nghiệm em làm theo cách của anh TĐN là đã ok, do máy in trong văn phòng đc share nên, nên mọi người cùng dùng chung, có người đc, người không? nên không biết có pải driver có ảnh hưởng hay không? nhưng cách chỉnh của anh TĐN đã thoả mãn đk của em. Cảm ơn các Anh.NHT

 

[tedaynui]

Chỉnh trong Propeties của máy invàchỉnh ở File\Page Setup\options thực chất chỉ là 1, nhưng nếu bác chỉnh trong Propeties của máy in và đặt là default thì các lần sau mình không phải đế ý đến nó nữa bác ạ !

Bạn nói nghe rất có lý. Nhưng thực tế mình đã gặp trường hợp này nhiều lần : khi chỉ chỉnh trong Page Setup thôi thì in ra vẫn thừa đầu, thừa đuôi. Nhưng sau khi chỉnh trong Properties của máy in thì ok (Mình đã test qua máy in HP 1200, 1100, 1320, 1020, 1220, Fujisu...)

TDN

 

[Thien]

Chào cả nhà.
Tiện đề tài này cho hỏi 1 chút, có code nào cho phép ta in bất cứ sheet nào cũng đều được canh lề theo đúng khổ A4 (Phần Margins ở Top, Bottom, letf, right,... đều được canh dãn ra hết mứt khổ A4).

Thân chào.

 

[anhtuan1066]

Món này bạn có thể tự Record macro mà... đâu có khó.. Như tôi record theo yêu cầu của bạn thì sẽ dc 1 code:

Sub Macro1()
With ActiveSheet.PageSetup
        .LeftHeader = ""
        .CenterHeader = ""
        .RightHeader = ""
        .LeftFooter = ""
        .CenterFooter = ""
        .RightFooter = ""
        .LeftMargin = Application.InchesToPoints(0)
        .RightMargin = Application.InchesToPoints(0)
        .TopMargin = Application.InchesToPoints(0)
        .BottomMargin = Application.InchesToPoints(0)
        .HeaderMargin = Application.InchesToPoints(0)
        .FooterMargin = Application.InchesToPoints(0)
        .PrintHeadings = False
        .PrintGridlines = False
        .PrintComments = xlPrintNoComments
        .CenterHorizontally = True
        .CenterVertically = False
        .Orientation = xlPortrait
        .Draft = False
        .PaperSize = xlPaperA4
        .FirstPageNumber = xlAutomatic
        .Order = xlDownThenOver
        .BlackAndWhite = True
        .Zoom = 100
        .PrintErrors = xlPrintErrorsDisplayed
    End With
    ActiveWindow.SelectedSheets.PrintPreview
End Sub

Từ đây có thể chỉnh sửa lại code tùy ý!
ANH TUẤN

 

[Thien]

Phải đặt thêm đoạn code này trong ThisWorkbook

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Call Macro1
End Sub

Để khi chọn lệnh in thì code của bác mới thực thi được.
Bên cạnh đó cách này thì mình biết rùi nhưng mình muốn xem có code nào ngắn gọn hơn không?.

TC.

 

[thanhlongpcb]

Em làm theo các cách trên cũng chỉnh được rồi.

 

[letinnghia]

Các bạn làm theo hướng dẫn nhé.