Ir para o conteúdo principal

 Como sempre na célula A1 ao abrir a pasta de trabalho?

Como todos sabemos, quando você abre uma pasta de trabalho, ela mostra a posição da célula onde você salvou e fechou da última vez. Como você pode sempre abrir uma pasta de trabalho com cada planilha em uma célula específica A1? Este artigo irá falar sobre algumas maneiras de resolver isso.

Sempre abra uma pasta de trabalho com cada planilha na célula A1 usando o código VBA

Sempre abra uma pasta de trabalho em uma planilha e célula A1 específicas usando o código VBA


seta azul bolha direita Sempre abra uma pasta de trabalho com cada planilha na célula A1 usando o código VBA

Por exemplo, você sempre deseja que a pasta de trabalho abra na célula A1 de cada planilha, independentemente de onde você estava na pasta de trabalho quando ela foi fechada pela última vez. Faça o seguinte:

1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela. No lado esquerdo Projeto-VBAProject painel, clique duas vezes Esta pasta de trabalho para abrir um módulo em branco e, em seguida, copie e cole o seguinte código no módulo, consulte a captura de tela:

Código VBA: sempre abra uma pasta de trabalho com cada planilha na célula A1:

Private Sub Workbook_SheetActivate(ByVal Wsh As Object)
'Updateby Extendoffice
On Error Resume Next
Wsh.Range("A1").Select
End Sub

doc sempre aberto na A1 1

2. Em seguida, feche este código e clique em Envie o > Salvar como para salvar a pasta de trabalho como Pasta de trabalho habilitada para macro do Excel formato, veja a captura de tela:

doc sempre aberto na A1 2

3. A partir de agora, quando você abrir esta apostila da próxima vez, clique em Habilitar Conteúdo para ativar o código e alternar entre as planilhas, você pode ver que cada planilha está na célula A1 automaticamente.

doc sempre aberto na A1 3


seta azul bolha direita Sempre abra uma pasta de trabalho em uma planilha e célula A1 específicas usando o código VBA

Se você só precisa abrir uma planilha específica na célula A1 ao iniciar a pasta de trabalho todas as vezes, o código VBA a seguir pode ajudá-lo.

Por exemplo, sempre desejo ir para a Planilha1 na célula A1 ao abrir a pasta de trabalho.

1. Mantenha pressionada a ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela. No lado esquerdo Projeto-VBAProject painel, clique duas vezes Esta pasta de trabalho para abrir um módulo em branco e, em seguida, copie e cole o seguinte código no módulo, consulte a captura de tela:

Código VBA: sempre abra uma pasta de trabalho com planilha específica na célula A1:

Private Sub Workbook_Open()
'Updateby Extendoffice
Application.Goto ThisWorkbook.Sheets("Sheet1").Range("A1"), True
End Sub

doc sempre aberto na A1 4

Note: No código acima, Sheet1 e A1 são a planilha e a referência de célula que você deseja acessar ao abrir a pasta de trabalho. Você pode alterá-los conforme sua necessidade.

2. Em seguida, feche este código e clique em Envie o > Salvar como para salvar a pasta de trabalho como Pasta de trabalho habilitada para macro do Excel formato, de agora em diante, quando você abrir esta apostila da próxima vez, clique em Habilitar Conteúdo para ativar o código, e ele irá para a Planilha1 na célula A1 automaticamente.

Melhores ferramentas de produtividade de escritório

🤖 Assistente de IA do Kutools: Revolucionar a análise de dados com base em: Execução Inteligente   |  Gerar Código  |  Crie fórmulas personalizadas  |  Analise dados e gere gráficos  |  Invocar funções do Kutools...
Recursos mais comuns: Encontre, destaque ou identifique duplicatas   |  Excluir linhas em branco   |  Combine colunas ou células sem perder dados   |   Rodada sem Fórmula ...
Super pesquisa: VLookup de múltiplos critérios    VLookup de múltiplos valores  |   VLookup em várias planilhas   |   Pesquisa Difusa ....
Lista suspensa avançada: Crie rapidamente uma lista suspensa   |  Lista suspensa de dependentes   |  Lista suspensa de seleção múltipla ....
Gerenciador de colunas: Adicione um número específico de colunas  |  Mover colunas  |  Alternar status de visibilidade de colunas ocultas  |  Compare intervalos e colunas ...
Recursos em destaque: Foco da Grade   |  Vista de Design   |   Grande Barra de Fórmula    Gerenciador de pastas de trabalho e planilhas   |  Biblioteca (Auto texto)   |  Data Picker   |  Combinar planilhas   |  Criptografar/Descriptografar Células    Enviar e-mails por lista   |  Super Filtro   |   Filtro Especial (filtro negrito/itálico/tachado...) ...
15 principais conjuntos de ferramentas12 Texto Ferramentas (Adicionar texto, Remover Personagens, ...)   |   50+ de cores Tipos (Gráfico de Gantt, ...)   |   Mais de 40 práticos Fórmulas (Calcule a idade com base no aniversário, ...)   |   19 Inclusão Ferramentas (Insira o código QR, Inserir imagem do caminho, ...)   |   12 Conversão Ferramentas (Números para Palavras, Conversão de moedas, ...)   |   7 Unir e dividir Ferramentas (Combinar linhas avançadas, Dividir células, ...)   |   ... e mais

Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo.  Clique aqui para obter o recurso que você mais precisa...

Descrição


Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil

  • Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations