Douglas Souzaps

Boa tarde galera, sou novo no fórum e estou iniciando em macros no excel, criei a seguinte macro para criar uma ferramenta de timesheet: Sub StartClock() ActiveSheet.Unprotect Password:="douglasps" ActiveSheet.Shapes.Range(Array("Picture 1")).Select Selection.ShapeRange.ZOrder msoSendToBack Range("I8").Select ActiveCell.FormulaR1C1 = "=NOW()" Range("I8").Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False ActiveSheet.Protect Password:="douglasps" Go = True MyClock ActiveWorkbook.Save Range("H7").Select End Sub Sub MyClock() If Go Then ActiveSheet.Calculate Application.OnTime Now() + TimeValue("00:00:01"), "MyClock" End If End Sub Sub StopClock() ActiveSheet.Unprotect Password:="douglasps" ActiveSheet.Shapes.Range(Array("Picture 1")).Select Selection.ShapeRange.ZOrder msoBringToFront Range("A1").Select Go = False ActiveSheet.Protect Password:="douglasps" ActiveWorkbook.Save Range("H7").Select End Sub A ferramenta funciona perfeitamente, o unico problema é que ela intefere em qualquer outra planilha que eu abrir... Alguém consegue me ajudar com isso? Tks