none
Manter PLAN1 sempre ao fundo RRS feed

  • Pergunta

  • Tenho na plan1 dois botoes que abrem forms. Quando clico no primeiro, CADASTRO, abre o frmCadastro e a plan1 fica aparecendo ao fundo. Mas quando clico no segundo botão de comando, DADOS, exibe o frmMov mas ao fundo sempre exibe a plan3(NOMES) onde fica armazenado os nomes cadastrados.Acho que não é certo o usuário visualizar a planilha de dados.Como manter sempre a plan1 ao fundo quando são executados os botões para exibir os formulários????
    segunda-feira, 28 de maio de 2012 11:36

Respostas

  • Mais uma vez: recomendo que você retire todos os métodos Select e Activate do seu código.

    No entanto, para uma questão de emergência, adicione ao fim do código:

    Sheets("Plan1").Select

    Sheets("Plan1").Activate


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    • Marcado como Resposta alantb quarta-feira, 30 de maio de 2012 11:30
    quarta-feira, 30 de maio de 2012 00:35
    Moderador

Todas as Respostas

  • No seu código você deve estar usando os métodos Activate/Select para dar foco à Planilha de Cadastro. Não use esses métodos, extraia a informação dessas tabelas diretamente, sem selecioná-las e sem usar o objeto ActiveSheet, Selection ou ActiveCell.

    Se não quiser alterar seu código, talvez funcione você utilizar o comando abaixo no início da rotina:

    Application.ScreenUpdating = False

    E o comando abaixo ao final da rotina:

    Application.ScreenUpdating = True


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    segunda-feira, 28 de maio de 2012 21:49
    Moderador
  • BENZADEUS,

    Coloquei:

    Application.ScreenUpdating = False  no UserForm_initialize do form e manteve a PLAN1 ao fundo como eu queria, mas ao fechar o form exibe a PLAN NOMES. Tentei colocar

    Application.ScreenUpdating = True no código do botão fechar e não deu. Sendo assim aonde vai esse trecho para retornar a plan1 quando abandona os formulários, ou seja, voltar a tela inicial..????


    terça-feira, 29 de maio de 2012 12:54
  • Mais uma vez: recomendo que você retire todos os métodos Select e Activate do seu código.

    No entanto, para uma questão de emergência, adicione ao fim do código:

    Sheets("Plan1").Select

    Sheets("Plan1").Activate


    Felipe Costa Gualberto - http://www.ambienteoffice.com.br

    • Marcado como Resposta alantb quarta-feira, 30 de maio de 2012 11:30
    quarta-feira, 30 de maio de 2012 00:35
    Moderador