Ir para o conteúdo principal

Como bloquear uma posição de planilha para sempre visível na pasta de trabalho do Excel?

Se houver várias planilhas em uma pasta de trabalho, quando você alternar para a última planilha, a primeira planilha ficará oculta na barra de guias da planilha, conforme mostrado abaixo. Agora que você deseja bloquear a posição de uma folha-mestre para sempre visível, como você pode lidar com isso?

posição 1 da folha de bloqueio doc doc seta para a direita posição 2 da folha de bloqueio doc

Bloquear a posição da folha com VBA


Bloquear a posição da folha com VBA

Aqui, apresento dois códigos VBA para você realizar esse trabalho.

Ir para a folha

1. Pressione Alt + F11 chaves para habilitar o Microsoft Visual Basic para Windows.

2. Clique inserção > Módulo, copie e cole o código abaixo no script.

VBA: pule para a planilha mestre

Sub GoToSheet()
'UpdatebyExtendoffice20180427
    Sheets("Master").Activate
End Sub

Note: Na fatia de código de Planilhas ("Mestre"). Ative, você pode mudar o Mestre a qualquer nome de planilha conforme necessário.

3. Em seguida, salve este código e volte para a pasta de trabalho, clique em Developer > Macros.
posição 3 da folha de bloqueio doc

4. No Macro caixa de diálogo, selecione o nome do código que você inseriu agora, clique Opções, crie um atalho para executar este código.
posição 4 da folha de bloqueio doc

5. Clique OK e feche o Macro diálogo.

A partir de agora, enquanto você pressiona o atalho que criou, a planilha master será ativada independentemente da planilha que você usar.

Mantenha a folha sempre na frente

1. Pressione Alt + F11 chaves para habilitar o Microsoft Visual Basic para Windows.

2. Duplo click Esta pasta de trabalho do Projeto-VBAProject painel e copie e cole o código abaixo no script.

VBA: Mantenha a folha sempre na frente

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
'UpdatebyExtendoffice2018027
    Dim xSheet As Worksheet
    Application.EnableEvents = False
    Set xSheet = Sheets("master")
    If Sh.Name <> xSheet.Name Then
        Sh.Move , xSheet
        xSheet.Activate
        Sh.Activate
    End If
    Application.EnableEvents = True
End Sub

posição 5 da folha de bloqueio doc

3. Salve o código e feche a janela do VBA. A partir de agora, seja qual for a folha em que você clicar, a folha mestre sempre ficará na frente da barra de guias.

posição 6 da folha de bloqueio doc doc seta para a direita posição 7 da folha de bloqueio doc

Observação: No código acima, "mestre" é o nome da planilha que você deseja manter visível, altere-o conforme necessário.

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 (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi there, Very helpfull. How can I freeze 2 sheets instead of one? Thanks (i'm beginner in VBA)
This comment was minimized by the moderator on the site
Hi, Francis, sorry for replying such late. Hope below VBA code can help you.<div data-tag="code">Private Sub Workbook_SheetActivate(ByVal Sh As Object)

'UpdatebyExtendoffice20211115

Dim xSheet1 As Worksheet

Dim xSheet2 As Worksheet

Dim xBol As Boolean



Application.EnableEvents = False



xBol = Application.ScreenUpdating

Application.ScreenUpdating = False

Set xSheet1 = Sheets("Sheet1")

Set xSheet2 = Sheets("Sheet2")

If (Sh.Name <> xSheet1.Name) Then

If (Sh.Name <> xSheet2.Name) Then

xSheet2.Move , xSheet1

Sh.Move , xSheet2

xSheet1.Activate

xSheet2.Activate

Sh.Activate

End If

End If

Application.ScreenUpdating = xBol

Application.EnableEvents = True

End SubIn the code, Sheet1 and Sheet2 are the two sheets that will be fixed in the front of all sheets whichever sheet you active.
This comment was minimized by the moderator on the site
This seems to change the order of my other tabs when clicking through them. Is there a way to stop that? I would like to keep them in a specific order but keep the 'master' tab visible. Thank you
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations