"S" (tại sao mọi người không thể ký e-mail của họ bằng ít nhất một cái tên?) Đã viết câu hỏi hôm nay.
Tôi đang cố gắng tự động đặt ngắt trang vào một bảng trong Excel. Tôi đã thử Dữ liệu - Tổng phụ, nhưng điều đó buộc tôi phải thêm Tổng hoặc Số. Tôi không muốn bất kỳ tổng phụ nào, chỉ cần ngắt trang bất cứ khi nào giá trị trong cột A thay đổi.
Macro này sẽ giải quyết vấn đề. Vì một số lý do, các macro thay đổi ngắt trang hoặc thiết lập trang mất nhiều thời gian để chạy, nhưng điều này chắc chắn sẽ nhanh hơn khi thực hiện quy trình theo cách thủ công. Macro giả định dữ liệu của bạn nằm trong cột A và nó bắt đầu ở hàng 2.
Sub AddBreaks() StartRow = 2 FinalRow = Range("A65536").End(xlUp).Row LastVal = Cells(StartRow, 1).Value For i = StartRow To FinalRow ThisVal = Cells(i, 1).Value If Not ThisVal = LastVal Then ActiveSheet.HPageBreaks.Add _ before:=Cells(i, 1) End If LastVal = ThisVal Next i End Sub
