Dica: outros idiomas são traduzidos pelo Google. Você pode visitar o English versão deste link.
Entrar
x
or
x
x
Registre-se
x

or

Como proteger todas as pastas de trabalho em uma pasta ao mesmo tempo no Excel?

No Excel, você pode proteger uma pasta de trabalho para evitar que outros usuários a editem, mas você já imaginou proteger várias pastas de trabalho ao mesmo tempo? Aqui, eu introduzo alguns truques em proteger todas as pastas de trabalho em uma pasta e várias folhas em uma pasta de trabalho no Excel.

Proteja pastas de trabalho em uma pasta ao mesmo tempo com VBA

Proteja várias folhas ao mesmo tempo com o Kutools for Excel boa idéia3

Guia do Office Habilitar Edição e Navegação por Guias no Office e Facilitar seu Trabalho ...
Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%
  • Reutilizar qualquer coisa: Adicione as fórmulas, gráficos e outras coisas mais usadas ou complexas aos seus favoritos e reutilize-os rapidamente no futuro.
  • Mais do que recursos de texto 20: Extrair Número da Cadeia de Texto; Extrair ou remover parte dos textos; Converta números e moedas em palavras inglesas ...
  • Mesclar Ferramentas: Várias pastas de trabalho e folhas em um; Mesclar várias células / linhas / colunas sem perder dados; Mesclar linhas duplicadas e soma ...
  • Ferramentas de divisão: Dados divididos em várias folhas com base no valor; Uma pasta de trabalho para vários arquivos Excel, PDF ou CSV; Uma coluna para várias colunas ...
  • Colar pulando Linhas ocultas / filtradas; Contagem e Soma pela cor de fundo; Criar lista de discussão e Envie e-mails pelo valor da célula...
  • Super Filtro: Crie esquemas de filtro avançados e aplique a qualquer folha; tipo por semana, dia, frequência e mais; filtros por negrito, fórmulas, comentário ...
  • Mais de recursos poderosos do 300; Funciona com o Office 2007-2019 e 365; Suporta todos os idiomas; Fácil implantação em sua empresa ou organização.

arrow blue right bubble Proteja pastas de trabalho em uma pasta ao mesmo tempo com VBA

Para proteger pastas de trabalho em uma pasta específica, você pode aplicar um código de macro para resolver.

1. Ative uma nova pasta de trabalho e pressione Alt + F11 chaves para abrir o Microsoft Visual Basic for Applications janela e clique inserção > móduloe, e cole abaixo o código para o Módulo script.

VBA: proteja pastas de trabalho em uma pasta.

Sub ProtectAll()
    Dim xWorkBooks As Workbook
    Dim xExitFile As String
    Dim xPassWord As Variant
    Dim xStrPath As String
    Dim xFileDialog As FileDialog
    Dim xFile As String
    On Error Resume Next
    Set xFileDialog = Application.FileDialog(msoFileDialogFolderPicker)
    xFileDialog.AllowMultiSelect = False
    xFileDialog.Title = "Select a folder [Kutools for Excel]"
    If xFileDialog.Show = -1 Then
        xStrPath = xFileDialog.SelectedItems(1)
    End If
    If xStrPath = "" Then
        Exit Sub
    Else
        xStrPath = xStrPath + "\"
    End If
    xPassWord = Application.InputBox("Enter password", "Kutools for Excel", , , , , , 2)
    If (xPassWord = False) Or (xPassWord = "") Then
        MsgBox "Password cannot be blank!", vbInformation, "Kutools for Excel"
        Exit Sub
    End If
    xFile = "*.xls"
    xExitFile = Dir(xStrPath & xFile)
    On Error Resume Next
    Application.ScreenUpdating = False
    Do While xExitFile <> ""
        Set xWorkBooks = Workbooks.Open(xStrPath & xExitFile)
        Application.DisplayAlerts = False
        xWorkBooks.SaveAs Filename:=xWorkBooks.FullName, Password:=xPassWord
        Application.DisplayAlerts = True
        Workbooks(xExitFile).Close False
        Set xWorkBooks = Nothing
        xExitFile = Dir
    Loop
    Application.ScreenUpdating = True
    MsgBox "Successfully protect!", vbInformation, "Kutools for Excel"
End Sub

doc protege todas as pastas de trabalho de uma pasta 1

2. Pressione F5 chave e um Selecione uma pasta A janela aparece para você selecionar uma pasta para proteger suas folhas de trabalho.
doc protege todas as pastas de trabalho de uma pasta 2

3. Clique OK e uma caixa de diálogo aparece para inserir a senha para proteger pastas de trabalho.
doc protege todas as pastas de trabalho de uma pasta 3

4. Clique OK, uma caixa de diálogo aparece para lembrar que todas as pastas na pasta selecionada foram protegidas com uma senha com sucesso.
doc protege todas as pastas de trabalho de uma pasta 4

Quando você abre as pastas de trabalho que você protegeu pelo código acima, uma caixa de diálogo aparece para entrar na senha. Ver captura de tela:
doc protege todas as pastas de trabalho de uma pasta 5

Ponta: Este código funciona para o 2007 ou versão superior do Excel, se você deseja aplicá-lo para proteger a versão inferior, você pode mudar xFile = "* .xls" para xFile = "* .xlsx" no código.


arrow blue right bubble Proteja várias folhas ao mesmo tempo com o Kutools for Excel

Na verdade, será mais freqüente proteger várias folhas em uma pasta de trabalho em nosso trabalho diário. Mas no Excel, você precisa proteger as folhas uma a uma com a função incorporada. No entanto, existe uma ferramenta poderosa - Kutools for Excel, as TIC Proteja a planilha O utilitário pode ajudá-lo a proteger todas as folhas ou folhas selecionadas da pasta de trabalho de uma só vez.

Kutools for Excel, com mais de 120 Funções úteis do Excel, aprimore sua eficiência operacional e economize seu tempo de trabalho.

Depois de instalação gratuita Kutools for Excel, faça o seguinte:

1. Ative a pasta de trabalho que deseja proteger suas folhas e clique em Empreendimento > Proteja a planilha. Ver captura de tela:
doc protege todas as pastas de trabalho de uma pasta 6

2. No Proteja a planilha diálogo, você pode verificar as folhas que deseja proteger, conforme você precisa da lista. Ver captura de tela:
doc protege todas as pastas de trabalho de uma pasta 7

3. Clique Ok, e outra caixa de diálogo aparece para você entrar e redigitar a senha, veja a captura de tela:
doc protege todas as pastas de trabalho de uma pasta 8

4. Clique Ok, e uma caixa de diálogo aparece para lembrá-lo de proteger com sucesso as planilhas.
doc protege todas as pastas de trabalho de uma pasta 9

Para desproteger essas folhas, basta clicar Empreendimento > Desproteger a planilha para inserir a senha para desproteger.
doc protege todas as pastas de trabalho de uma pasta 10

download do doc 1


Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Inserir rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de endereços e enviar e-mails ...
  • Bar Super Fórmula (facilmente editar várias linhas de texto e fórmula); Layout de leitura (leia e edite facilmente grandes números de células); Colar para intervalo filtrado...
  • Mesclar células / linhas / colunas sem perder dados; Conteúdo de células divididas; Combinar linhas / colunas duplicadas... Prevenir Células Duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Exclusivo Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros de trabalho; Seleção aleatória ...
  • Cópia exata Múltiplas Células sem alterar a referência da fórmula; Criar automaticamente referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair texto, Adicionar texto, remover por posição, Remover espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salve e aplique esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro especial por negrito, itálico ...
  • Combinar pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Dividir dados em várias planilhas; Lote Converter xls, xlsx e PDF...
  • Mais de recursos poderosos do 300. Suporta Office / Excel 2007-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Recursos completos Avaliação gratuita de um dia de 30.
kte tab 201905

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

  • Ativar edição e leitura com guias no 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!
fundo officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Martin · 1 months ago
    Brilliant. Saves me nearly an hour every month. Thank you.
  • To post as a guest, your comment is unpublished.
    Mary · 1 years ago
    can you do the same code but for unprotecting? with option to browse for the folder
  • To post as a guest, your comment is unpublished.
    P · 2 years ago
    I'm getting a syntax error for the following: <span style="background-color...
  • To post as a guest, your comment is unpublished.
    ckshah · 2 years ago
    workbook protect ...great program....
    very helpful