Code do not recognize retrieved value

Hi there, will appreciate any help on this thread. I have this code created by djbomaha that in Y7 count cells that contain values over 0.01 from the X9:X48 cell range and also from the same range of cells X9:X48 count cells that contains values from 8.5 but not higher than 10 IN Q49, count cells that contains values from 6.5 but not higher than 8.4 IN Q51, count cells that contains values from 4 but not higher than 6.4 IN Q53, count cells that contains values higher than 0 but not higher than 3.9 IN Q55, this counts are kept when i clear contents in the range of cell X9:X48 and them adds up the new counts to previews counts, the code it does eaxactly what i need, the problem is that works only when i type and enter the values on the range of cells X9:X48, when the values on the cells range X9:X48 are retrieved with formula from the range of cells L17:L26, T17:T26, L33:42 and T33:T42 the code does not recognize the retrieved values into X9:X48 and does not do the cumulative count on Y7, Q49, Q51, Q53, Q55. What i need is that when i enter values on cell ranges L17:L26, T17:T26, L33:42 and T33:T42 those values to be recognized by the code in Y7, Q49, Q51, Q53, Q55 I have attached The file for better reference. Many thanks for any help

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Long
Dim pVal As Variant
Dim sNumber As String

For i = 9 To 48
If Not Intersect(Target, Range("X" & i & ":X" & i)) Is Nothing Then
pVal = Target.Value
sNumber = IsNumeric(pVal)
If (sNumber = True) Then
If (pVal > 0 And Not pVal > 3.9) Then Range("Q55") = Range("Q55") + 1
If (pVal > 3.9 And Not pVal > 6.4) Then Range("Q53") = Range("Q53") + 1
If (pVal > 6.4 And Not pVal > 8.4) Then Range("Q51") = Range("Q51") + 1
If (pVal > 8.4 And Not pVal > 10) Then Range("Q49") = Range("Q49") + 1
If (pVal > 0.1) Then Range("Y7") = Range("Y7") + 1
End If
Exit Sub
End If
Next i