refresh Result List

[decodagobert]

Hi all,

to work with staking plans I need to update permanently the result list.

I tried follow code, to update my result list

Code: Select all

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Columns.Count <> 16 Then Exit Sub
Application.EnableEvents = False

If Range("AF2") < 45 And Range("AF2") > 30 Then
Range("Q2") = "-6"
End If
If Range("AF2") < 25 And Range("AF2") > 15 Then
Range("Q2") = ""
End If

Application.EnableEvents = True
End Sub

but it's not really working - ideas what I'm doing wrong?

dc

[GaryRussell]

Code: Select all

If Range("AF2") < 25 And Range("AF2") > 15 Then
Range("Q2") = ""
End If

Is the above code really necessary? When -6 is detected and the results are updated then Q2 is blanked automatically.
Have you checked if the results are updated if you insert -6 manually?

[decodagobert]

Hi Gary,

Manually is working everything good.

I'll try without the 2nd part of the code.

greetings from Spain

decodagobert

[decodagobert]

Hi Gary,

finaly, the result list is updating between my time range - but all other triggers are not working

without the code above it's everthing working...

decodagobert

[GaryRussell]

There must still be a problem with your code somewhere if other triggers are not working.