Verifique a ortografia de várias pastas de trabalho do Excel

Verifique a ortografia de várias pastas de trabalho do Excel

Alguém pode sugerir um método para verificar a ortografia em várias planilhas do Excel - sem precisar abri-las todas e executar a verificação manualmente?

Tenho verificado bastante à medida que prossigo, mas gostaria de fazer uma última varredura de toda a documentação antes de ela ser assinada.

Quero verificar diversas pastas de trabalho, ou seja, arquivos diferentes, sem precisar fazer tudo individualmente. Tenho cerca de 60 pastas de trabalho!

Responder1

Clique com o botão direito no nome de uma planilha na parte inferior, selecione todas as planilhas e pressione F7.

Responder2

O Excel não pode verificar a ortografia de uma pasta de trabalho fechada. Portanto, seria necessário escrever código para abrir cada arquivo, verificar a ortografia, fechar o arquivo e passar para o próximo. Isso é bastante complicado e complicado de desenvolver. Não vou fazer isso aqui. Então, aqui está uma alternativa para chegar quase ao seu objetivo.

Adicione o VBA abaixo ao ThisWorkbookobjeto no VBA Explorer. Quando você executa esta macro, ela verifica a ortografia de todas as pastas de trabalho abertas, exceto para PERSONAL.xlsbevitar confusão.

Sub SpellCheckOpenWorkbooks()

'LOOP SOURCE: www.TheSpreadsheetGuru.com

Dim wb As Workbook
Dim sht As Worksheet


For Each wb In Application.Workbooks
  If wb.Name <> "PERSONAL.xlsb" Then
    For Each sht In wb.Worksheets

        sht.Cells.CheckSpelling

    Next sht
  End If
Next wb

End Sub

Portanto, abra as pastas de trabalho que deseja verificar e execute a macro.

Fonte para loop VBA -Percorrer todas as planilhas em todas as pastas de trabalho atualmente abertas

NOTA: Use por sua conta e risco. Certifique-se de salvar seu trabalho antes de começar.

informação relacionada