
제목에서 알 수 있듯이 VBA를 통해 필터를 사용하여 필터링된 테이블에서 미래의 모든 날짜 항목을 숨기고 계산하려고 시도하고 있지만 코드는 내가 시도한 방식으로 작동하지 않습니다.
내 현재 접근 방식은 다음과 같습니다.
Dim wbkPlanning As Workbook
Dim wksPlanning As Worksheet
Dim FilterValue as Integer
Workbooks.Open (.... Some Path...) 'this works as i have several other Autofilters in this macro that do the job just fine)
Set wbkPlanning = Workbooks("NAMEOFWORKBOOK.xlsx")
Set wksPlanning = wbkPlanning.Worksheets("NameOfWorksheet")
wksPlanning.Range("$A$4:$AS$600").AutoFilter Field:=24, Criteria1:="=<" & CDbl(Date)
FilterValue = wksPlanning.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible).Cells.Count - 1
MsgBox FilterValue
워크시트에서 필터를 수동으로 설정하면 결과가 괜찮지만 이렇게 설정하면 결과가 0이 됩니다..
나는 좀 당황스럽고 몇 가지 팁을 정말 고맙게 생각합니다.
감사해요!
답변1
워크시트의 다른 필터로 인해 날짜 필터가 올바른 결과를 표시하지 못했습니다. CDbl(Date) 기준이 작동했습니다.