Code no longer working help please

Hi everyone,

I had this code in my spreadsheet and it worked perfectly. For some reason it has stopped working. Does anyone have any suggestions?

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target.Cells, Range("C:C")) Is Nothing Then
    Application.ScreenUpdating = False
    ActiveWorkbook.Worksheets("Invoice Summary").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Invoice Summary").Sort.SortFields.Add Key:=Range("C6"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
        xlSortNormal
    With ActiveWorkbook.Worksheets("Invoice Summary").Sort
        .SetRange Range("A6:L1000")
        .Header = xlNo
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With
    Application.ScreenUpdating = True
End If
End Sub

Thank you

Administrative Note:

Welcome to the forum.

We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(Note: this change is not optional. No help to be offered until this moderation request has been fulfilled.)

Once the code tags are addressed, please explain what "stopped working" means.

• Does the code run?
• Does it run but do nothing?
• Does it produce error messages? If so, what do the messages say?
• Does it produce unexpected/wrong results? If so, how do the results differ from what you expect?
• Does it hang?

Thanks Jeff, the code doesnt run at all. I dont get any error messages.

Before it used to order my rows in date order everytime i inputted a new date in column C. Now it does nothing

I have attached the sample worksheet that the code was built for