Я написал этот код, чтобы проверить, равна ли сумма отфильтрованных значений 0 или нет. Несмотря на то, что сумма отфильтрованных значений равна 0, этот код не работает. Я проверил формат отфильтрованной суммы - вижу, что кое-где сумма равна 0; 0,00; (0,00). Пожалуйста, помогите!
Set SumRange = ReconWS.Range(Cells(2, AmountFilter), Cells(ReconRows, AmountFilter)).SpecialCells(xlCellTypeVisible)
If Application.WorksheetFunction.Sum(SumRange) = 0 Then
ReconWS.Range(Cells(2, MatchedItem),Cells(ReconRows,MatchedItem)).SpecialCells(xlCellTypeVisible).Select
Selection.Value = "Matched to zero"