Reinstalled excel, macros broken

[Rick Campbell]

Here's the start of one macro. It goes to errorhandler each time. Worked
before. I'm sure it's some switch I forgot to turn on. Help!

Public City As String
Option Explicit
Public Sub SCCMonthlyUpdateSFR()
Sheets("work").Select
Call Reil1
Range("D7").Select
Dim Cell As Range
For Each Cell In Range("B7:B27")
City = Cell.Value
Call zcopy
Next
End Sub

Public Sub zcopy()
On Error GoTo ErrorHandler
Selection.copy