I have this code and I was able to properly execute it but the problem is I couldnt seem to get it to work when I enable the shared workbook. The file that I am working on is going multiple users. Is this possible?

Application.ScreenUpdating = False
Sheets("Dumpsheet").Visible = True
Sheet2.Unprotect Password:="abc"

Range("N4").Select
Range(Selection, Selection.End(xlDown)).Select
Selection.Copy
Sheets("Dumpsheet").Select
Cells(Application.Rows.Count, 1).End(xlUp).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True
Range("A3").Select
Sheets("Tracker").Select
Range("E2").Select
Application.Goto Reference:="DeleteData"
Selection.SpecialCells(xlCellTypeConstants, 23).Select
Application.CutCopyMode = False
Selection.ClearContents
Range("A1:B1").Select
Range("B1").Activate

Sheets("Dumpsheet").Visible = False
Application.ScreenUpdating = True
Sheet2.Protect Password:="abc"