Glaudemir, boa tarde.
Novamente, testei esse novo sistema e a única coisa que não faz como vc quer é a questão de ativar a Plan1 automaticamente, mas isso pq no código realmente não há essa implementação. Então, para resolver...
...Eu gostaria que ao fazer o login, a Plan1 fosse ativada automaticamente. (Do jeito que está Menu é quem fica ativada)
bastaria disparar o método Activate para a Plan1, logo abaixo do loop For-Next:
. . .
For lContador = 2 To lTotal
Sheets(Sheets("Senha").Range("C" & lContador).Value).Visible = True
Next lContador
ThisWorkbook.Sheets("Plan1").Activate 'AQUI
Unload frmLogin
Else
. . .
Quanto à questão...
... Ao chegar na Plan1, tentem preencher alguma célula e vejam se funciona normalmente.
não percebi nenhum problema em preencher quaisquer intervalos na Plan1, não ficou travado como vc descreveu no primeiro tópico.
O problema talvez possa estar em seu software, não nas planilhas/pastas.
Só prá complementar, o teste que fiz foi utilizando Excel 2016 64bits x Win10.
Postado : 08/09/2016 10:01 am