Bom dia a todos, tenho uma planilha que utilizei vba em todo seu funcionamento e Utilizo ela em rede com outras pessoas, para solucionar o problema do uso coletivo da Planilha para que eu não tivesse mais que toda vez ter que pedir para alguém fecha-la toda vez que esqueciam utilizei um código vba que fecha a Planilha a cada 5 minutos caso não haja movimentação. Porém,utilizo essa planilha através de usuários com login e gostaria que meu usuário em especifico não fosse vinculado a este timer. segue abaixo todo o código:
Dentro de este Livro:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
IniciaTimer
End Sub
Dentro de um Módulo:
Sub IniciaTimer()
If alertTime <> 0 Then
On Error Resume Next
Application.OnTime EarliestTime:=alertTime, Procedure:="AutoSalva", Schedule:=False
On Error GoTo 0
End If
alertTime = Now + TimeValue("00:10:00")
Application.OnTime alertTime, "AutoSalva"
End Sub
Sub AutoSalva()
Application.DisplayAlerts = False
ActiveWorkbook.Save
Application.Quit
End Sub
Alguem poderia me ajudar?
Postado : 03/06/2016 7:46 am