Merge cells is a very useful function in EXCEL, but sometimes, we would find merged area is split while we want to print.
Obviously, it is necessary to adjust print area and is very simple. But, what if there are many pages? It will be a tiring work!
Let do something with VBA. Below code shows how to automatically adjust vertical page breaks.
Obviously, it is necessary to adjust print area and is very simple. But, what if there are many pages? It will be a tiring work!
Let do something with VBA. Below code shows how to automatically adjust vertical page breaks.
Dim longBreaks As Long
longBreaks = Me.HPageBreaks.Count 'Get total breaks
'Reset all breaks location
Call Me.ResetAllPageBreaks
Dim i As Long
Dim objBreakCell As Range
For i = 1 To longBreaks
Set objBreakCell = Me.HPageBreaks.Item(i).Location
If objBreakCell.MergeCells Then
'If the break is in merged area, set the first cell of area to new page break
Call Me.HPageBreaks.Add(objBreakCell.MergeArea.Cells(1))
End If
Next
Comments
Post a Comment