Excel办公技巧——完整显⽰跨页合并的单元格在⽇常⼯作中,我们经常会遇到⼤量合并的单元格,⽽部分合并的单元格会跨页显⽰,也即:合并的单元格区域显⽰在两页中。如下图⽰:⽽我们最终想要的打印效果,如下:那么,上述效果是如何实现的呢?⽅法如下:步骤1:按Alt+F11快捷键打开⼯程资源管理器窗⼝,即VBE窗⼝;步骤2:依次单击菜单栏上的[插⼊]---[模块]选项,在模块1中输⼊以下代码:Sub 完整显⽰合并的单元格区域()Dim P, MergeAddress As String, PageCell As Range, MergeValueActiveWindow.View = xlPageBreakPreviewFor Each P In ActiveSheet.HPageBreaksSet PageCell = Cells(P.Location.Row - 1, ActiveCell.Column)If PageCell.MergeCells And Not Intersect(Cells(P.Location.Row, ActiveCell.Column),PageCell.MergeArea) Is Nothing ThenMergeAddress = PageCell.MergeArea.AddressMergeValue = PageCell.MergeArea(1).ValuePageCell.MergeArea.UnMergeRange(Range(MergeAddress)(1), PageCell).MergeWith Range(PageCell.Offset(1, 0), Cells(Split(MergeAddress, '$')(4), ActiveCell.Column)).Merge.Value = MergeValueEnd WithEnd IfNextActiveWindow.View = xlNormalViewEnd Sub模块1代码的截图如下:步骤3:返回⼯作表界⾯,因B列是合并的区域,所以,我们⾸先选择B列数据,然后在模块1代码窗⼝中,按[执⾏]按钮,也即达到我们想要的效果。鸣谢:若喜欢本篇⽂章,欢迎您的点赞,评论和分享!谢谢!!