Change to:

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Range("F6:G7")ClearContents
Application.EnableEvents = True
End Sub

"Don" wrote in message
...
I created some code that gets Excel in a loop when I open the file and I
need
to know how to break out? It is in the Sheet option using the
Application.EnableEvents in Office 2007 and will not let me break out of
the
loop and I have to close doing a cntl+alt+delete and hard crashing Excel.

I have updated I think all the files, but if I have some not updated and
people move to Office 2007, I would like another way to get out?

Any help?

see code below from the sheet

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Range(Cells(6, 6), Cells(7, 7)).Select
Selection.ClearContents
Application.EnableEvents = False
End Sub