VBA – Configuração de Exibição de Quebras de Página

Uma maneira de acelerar seu código VBA é desativar a exibição de quebras de página alterando a configuração DisplayPageBreaks. A alteração dessa configuração nem sempre terá impacto. Ela só deve ter importância se (Da Microsoft):

• Você tiver definido anteriormente uma propriedade PageSetup para a planilha relevante e seu procedimento VBA modificar as propriedades de muitas linhas ou colunas;
• OU Seu procedimento VBA força o Excel a calcular as quebras de página (exibindo a Visualização de Impressão ou modificando quaisquer propriedades de PageSetup).

Para desativar a exibição de quebras de página, defina a propriedade DisplayPageBreaks como falso:

ActiveSheet.DisplayPageBreaks = False

Você pode ativar novamente o DisplayPageBreaks definindo a propriedade como verdadeiro:

ActiveSheet.DisplayPageBreaks = True

Observe que a configuração DisplayPageBreaks deve ser definida para cada planilha individual. Para desativar a exibição de quebras de página para todas as planilhas em uma pasta de trabalho:

Sub DisplayPageBreaks_Exemplo()

    Dim ws As Worksheet
    For Each ws In Worksheets
       ws.DisplayPageBreaks = False
    Next ws
    
End Sub

Modo de Visualização de Quebra de Página

Para colocar a Planilha1 no modo de visualização de quebra de página a partir do código:

Planilha1.Activate

ActiveWindow.View = xlPageBreakPreview

Restaurar o Modo de Visualização Normal

Para colocar a Planilha1 na Visualização Normal a partir do código:

Planilha1.Activate

ActiveWindow.View = xlNormalView