Timestamp Doesn't Work When Workbook Is Shared

[Anaky]

Hi;

I am using a Timestamp which works fine when I don't have the workbook shared, though when I share the workbook, which I want to do it gives me Runtime Error 1004.

Here is the code I am using;

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 Then
Cells(Target.Row, 3).Value = Time
End If
Sheets("Days A").Protect UserInterfaceOnly:=True
End Sub

Any help is very much appriciated.

Kind Regards;

Anaky