当前位置: 代码迷 >> Office >> VBA中怎么对单元格的数据进行组合和取消组合,求代码
  详细解决方案

VBA中怎么对单元格的数据进行组合和取消组合,求代码

热度:9540   发布时间:2013-02-26 00:00:00.0
VBA中如何对单元格的数据进行组合和取消组合,求代码
在VBA中我们通过调数据库得到数据放在EXCEL中,应该如何通过代码对这些数据进行组合和取消组合..
求代码,坐等高手...

------解决方案--------------------------------------------------------
Sheet1.Range("A1:F5").Group
这个是行组合还是列组合呢?

组合分行列的,下面给一个连续行的任意分组层次的功能,供参考。
VB code
Public Sub GenerateOutline()    Dim objRow As Range       For Each objRow In Application.ActiveSheet.UsedRange.Rows        objRow.OutlineLevel = 组合层数 + 1    NextEnd SubPublic Sub ResetOutlines()    Application.ActiveSheet.UsedRange.Rows.OutlineLevel = 1End Sub
------解决方案--------------------------------------------------------
range("a1:f" & i)

sheet1.usedrange.select


------解决方案--------------------------------------------------------
sheet的usedrange属性,是选择所有使用过的单元格的最大矩形区域,即使只是设置了格式,也算使用过。
  相关解决方案