Bài 7: Trình bày và in trang tính

Nhỏỏ Hương

trình bày các bước để điều chỉnh ngắt trang

qwerty
18 tháng 4 2017 lúc 7:52

Bạn có thể giúp mình code hoặc bằng công thức nào đấy để (Ví dụ tại ô A20 là ngắt hết trang. Khi in thì khi đến đoạn ngắt đó mình muốn định dạng border đường viền ngoài kẻ liền còn bên trong là chấm chấm. Cho nên mình muốn tại ô A20 đặt công thức gì để nó phát hiện và thông báo một chữ nào đó "ngắt trang" chẳng hạn để mình sử dụng condition formarting để định dạng đường viền kẻ (nếu ô nào đó có chứ "ngắt trang" thì nó tạo viền kẻ cho mình để in theo ý muốn)

Hoặc:

Sub getPageBreak()
Dim sh As Worksheet, ra As Range, hPB As HPageBreak
With Application
.ScreenUpdating = False
Set sh = ActiveSheet
sh.ResetAllPageBreaks
sh.Range("A:A").ClearComments
ActiveWindow.View = xlPageBreakPreview
For i = 1 To sh.HPageBreaks.Count
sh.HPageBreaks(i).Location.Offset(-1).AddComment ("Ngat trang tai day")
Next
ActiveWindow.View = xlNormalView
.ScreenUpdating = True
End With
End Sub

Bình luận (0)
Trương Hoàng Phố
10 tháng 5 2018 lúc 18:52

B1 chọn view-> page break view. xuất hiện dấu ngắt trang

B2 đưa trỏ chuột vào dấu ngắt trang

B3 kéo thả đến vị trí cần thiết

Bình luận (0)

Các câu hỏi tương tự
Phạm Hằng Nga
Xem chi tiết
Phương Thảo
Xem chi tiết
frt
Xem chi tiết
frt
Xem chi tiết
Lucy Heartfilia
Xem chi tiết
Loan Phương
Xem chi tiết
Love
Xem chi tiết
Tuan Minh
Xem chi tiết
Nachanh
Xem chi tiết