一:单元格合并
ObjSheet.Range("M<%=irow%>:W<%=iRow%>").MergeCells = true(行号到列号之间的单元格合并,true表示合并)
二:插入分页
ObjSheet.Range("A<%=irow%>").Select(首先选定在哪行进行插入)
Obj.ActiveWindow.SelectedSheets.HPageBreaks.Add Obj.ActiveWindow.ActiveCell(在选下行的下方插入)
一:单元格合并
ObjSheet.Range("M<%=irow%>:W<%=iRow%>").MergeCells = true(行号到列号之间的单元格合并,true表示合并)
二:插入分页
ObjSheet.Range("A<%=irow%>").Select(首先选定在哪行进行插入)
Obj.ActiveWindow.SelectedSheets.HPageBreaks.Add Obj.ActiveWindow.ActiveCell(在选下行的下方插入)