erro de automação falha catastrófica
Enviado: 17 Nov 2016 às 07:59
olá.
possuo esse modulo:
Function Plani(ByVal lPlan As Long) As String
'Recalcula a função
Application.Volatile
'Retorna o nome da planilha
Plani = Worksheets(lPlan).Name
End Function
ele funciona bem por um tempo, mas depois de uns dois dias todas as planilhas que eu uso começa a dar essa falha do titulo e quando abro o depurador aparece centenas de planilhas fantasma que não existem na pasta de trabalho se eu fecho o depurador funciona normal mas como existem usuários iniciantes nestas planilhas não queria deixar assim
o que pode estar ocorrendo?
to mandando um modelo
possuo esse modulo:
Function Plani(ByVal lPlan As Long) As String
'Recalcula a função
Application.Volatile
'Retorna o nome da planilha
Plani = Worksheets(lPlan).Name
End Function
ele funciona bem por um tempo, mas depois de uns dois dias todas as planilhas que eu uso começa a dar essa falha do titulo e quando abro o depurador aparece centenas de planilhas fantasma que não existem na pasta de trabalho se eu fecho o depurador funciona normal mas como existem usuários iniciantes nestas planilhas não queria deixar assim
o que pode estar ocorrendo?
to mandando um modelo