# Macro Stopped Working Without Explanation

#### rob51852

##### Board Regular
Hello guys

I have used a spreadsheet with the following code for a while but it seems to have stopped working. I haven't made any other changes so I am scratching my head. Can anyone see what is wrong?

Thank you

Code:
``````Private Sub Worksheet_Change(ByVal Target As Range)Application.ScreenUpdating = False
Dim rng As Range
Set rng = Application.Union(Worksheets("Market").Range("Z5"), Worksheets("Market").Range("AA5"), Worksheets("Market").Range("AC5"), Worksheets("Market").Range("Z6"), Worksheets("Market").Range("AA6"), Worksheets("Market").Range("AC6"))
If Not Intersect(Target, rng) Is Nothing Then
If Worksheets("Market").Range("Z5") = "0" And Worksheets("Market").Range("AA5") = "0" And Worksheets("Market").Range("AC5") = "Y" And Worksheets("Market").Range("Z6") = "0" And Worksheets("Market").Range("AA6") = "0" And Worksheets("Market").Range("AC6") = "N" Then Call Server1
If Worksheets("Market").Range("Z5") = "0" And Worksheets("Market").Range("AA5") = "0" And Worksheets("Market").Range("AC5") = "N" And Worksheets("Market").Range("Z6") = "0" And Worksheets("Market").Range("AA6") = "0" And Worksheets("Market").Range("AC6") = "Y" Then Call Server2
End If
Application.ScreenUpdating = True
End Sub``````

### Excel Facts

Return population for a City
If you have a list of cities in A2:A100, use Data, Geography. Then =A2.Population and copy down.

#### James006

##### Well-known Member
Hello,

It might just be ... your event macros got stuck ...

Just close your file and close Excel ...

Then re-open ... and test ...

HTH

Replies
3
Views
64
Replies
3
Views
81
Replies
1
Views
218
Replies
4
Views
160
Replies
1
Views
447

1,171,625
Messages
5,876,517
Members
433,197
Latest member

### We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.

### Which adblocker are you using?

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

### Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

### Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back