fpSpread1.ActiveSheet.AddRangeGroup(0, 20, true);
fpSpread1.ActiveSheet.AddRangeGroup(0, 10, true);
fpSpread1.ActiveSheet.RangeGroupBackGroundColor = Color.Yellow;
fpSpread1.ActiveSheet.RangeGroupButtonStyle = FarPoint.Win.Spread.RangeGroupButtonStyle.Enhanced;
FarPoint.Win.Spread.IRangeGroupSupport rangeGroupSupport = ((FarPoint.Win.Spread.IRangeGroupSupport)(fpSpread1.ActiveSheet));
if ((rangeGroupSupport == null)) {
return;
}
FarPoint.Win.Spread.RangeGroupInfo[] rgi = rangeGroupSupport.GetRangeGroupInfo(2, true);
rangeGroupSupport.ExpandRangeGroup(rgi[0], true, true);
FpSpread1.ActiveSheet.AddRangeGroup(0, 20, True)
FpSpread1.ActiveSheet.AddRangeGroup(0, 10, True)
FpSpread1.ActiveSheet.RangeGroupBackGroundColor = Color.Yellow
FpSpread1.ActiveSheet.RangeGroupButtonStyle = FarPoint.Win.Spread.RangeGroupButtonStyle.Enhanced
Dim rangeGroupSupport As FarPoint.Win.Spread.IRangeGroupSupport = CType(FpSpread1.ActiveSheet, FarPoint.Win.Spread.IRangeGroupSupport)
If rangeGroupSupport Is Nothing Then
Return
End If
Dim rgi() As FarPoint.Win.Spread.RangeGroupInfo = rangeGroupSupport.GetRangeGroupInfo(2, True)
rangeGroupSupport.ExpandRangeGroup(rgi(0), True, True)