problems all arround..
I have 3 tabs in 1 sheet - A1, A100 and A200
so in my first market is Q2 for my refresh, the second will be Q101 and the third Q201
I need to refresh all this market some seconds before the off.
my code:
- Code: Select all
Dim refresh As Integer
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Columns.Count <> 16 Then Exit Sub
Application.EnableEvents = False
If Range("V2") > 10 Then
Range("Q2;Q101;Q201") = "1"
End If
If Range("V2") < 10 And Range("V2") > 8 Then
Range("Q2;Q101;Q201") = "-6"
End If
If Range("V2") < 8 Then
Range("Q2;Q101,Q201") = "1"
End If
Application.EnableEvents = True
End Sub
it's onlyworking with the Q2 cell, the others 2 are empty
What I'm doing wrong?
thanks for answer
decodagobert