WinForms윈폼 SUBTOTAL 문의
페이지 정보
작성자 하르모니 작성일 2020-11-02 17:50 조회 4,677회 댓글 1건본문
관련링크
안녕하세요.
SUBTOTAL 이 적용이 안되는 경우는 어떤 경우가 있는가요?
현재 프로그램에서 데이터를 불러와 아래에 합계를 계속 보여주면서 필터를 했을때도 해당값이 나오도록
할려고 하고 있습니다.
행을 고정하고 언필터까지 적용을 해놨습니다.
If VIEW1.Tables(WORK_TABLE).Rows.Count > 0 Then
FpSpread1_Sheet1.AddUnboundRows(FpSpread1_Sheet1.RowCount, 1)
' 맨아래행에 sum함수를 지정한다.
SetSumRowStyle()
'합계표시
FpSpread1.ActiveSheet.FrozenTrailingRowCount = 1
Else
'합계표시
FpSpread1.ActiveSheet.FrozenTrailingRowCount = 0
ErrorMsg("내역이 없습니다!")
End If
'맨아랫행을 필터가 걸리더라도 표시되도록 한다.
Dim unfilterrows As Integer() = {FpSpread1_Sheet1.RowCount - 1}
FpSpread1.Sheets(0).RowFilter.UnfilteredRows = unfilterrows
'필터시 값이 변동되도록 함수 다시 정의
FpSpread1.ActiveSheet.Cells(FpSpread1.ActiveSheet.RowCount - 1, 16).Formula = String.Format("SUBTOTAL(9,Q1:Q{0})", 351)
FpSpread1.ActiveSheet.Cells(FpSpread1.ActiveSheet.RowCount - 1, 17).Formula = String.Format("SUBTOTAL(9,R1:R{0})", 351)
FpSpread1.ActiveSheet.Cells(FpSpread1.ActiveSheet.RowCount - 1, 18).Formula = String.Format("SUBTOTAL(9,S1:S{0})", 351)
이렇게 하면 필더전 값은 나오고 행도 고정되어 있습니다.
문제는 필터를 적용했을때 맨아랫쪽 행의 값이 변동이 안됩니다.
필터에따라 값이 변경이 되야되는 안되더라구요 .
FpSpread1_AutoFilteringColumn 이벤트에 넣어도 안되구요..
제가 뭔가 잘못한건지 답변부탁드립니다.
댓글목록
집념님의 댓글
집념 작성일버전 7은 모르겠지만 버전 8 에서 사용했던 코드입니다. 필요한 기능 대부분이 지원이 됩니다. 하단 고정, 해당 컬럼 합, 필터적용시 합계 반영.. vS.ActiveSheet.ColumnFooter.SetAggregationType(0, i, FarPoint.Win.Spread.Model.AggregationType.Sum) Dim cellNum As New FarPoint.Win.Spread.CellType.NumberCellType() vS.ActiveSheet.ColumnFooter.Columns.Get(i).CellType = cellNum