Pessoal,
Estou com um grande problema.
Tenho uma planilha compartilhada entre varios usuarios esta planilha contem varias macros até ai tudo bem.
O problema é que quando os usuarios começam a utiliza-la seu tamanho vai aumentando muito.
Ex. A planilha tem no maximo 4mega quando alguns usuarios entram e começam a usar vai para mais de 100mega, travando tudo.
Depois de varios estudos cheguei a conclusão que oque eu poderia fazer para solucionar isso seria:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If ActiveWorkbook.SharedWorkspace Then
If UBound(ActiveWorkbook.UserStatus) = 1 Then
Application.DisplayAlerts = False
ActiveWorkbook.ExclusiveAccess
' Deveria ter algum comando para COMPARTILHAR A PLANILHA NOVAMENTE
Application.DisplayAlerts = True
End If
Else
Application.DisplayAlerts = False
' Deveria ter algum comando para COMPARTILHAR A PLANILHA NOVAMENTE
Application.DisplayAlerts = True
End If
End Sub
Tente me ajudar, pois já não sei mais oque fazer.
Postado : 23/03/2012 4:51 am