Pessoal, utilizo o trecho do código abaixo para realizar uma formatação na minha planilha.
Existe uma coluna que fica um dropbox para a pessoa escolher entre #, $, % ou @. para determinar o que será feito na formatação da respectiva linha.

Gostaria de fazer uma adaptação para que quando fosse encontrado "%" (nesta respectiva coluna) o código inserisse uma quebra de página.

Sub MesclarEtc()
    Dim Ulinha  As Double
    Dim i       As Double
    
'Pega a última linha da coluna
    Ulinha = Range("C1048575").End(xlUp).Row
   
    For i = 3 To Ulinha
' se encontrar #, seleciona e formata da célula 4 ao 7
        If UCase(Trim(Cells(i, 3))) = UCase(Trim("#")) Then
            
            Range(Cells(i, 4), Cells(i, 7)).Select
            With Selection
                .HorizontalAlignment = xlCenter
                .MergeCells = True
            End With
    
    Next i
    Range("C3").Select
End Sub

Pensei e tentei o código abaixo, mas na verdade foi só um teste de leigo:

    
For i = 3 To Ulinha
' se encontrar %, insere quebra de página
        If UCase(Trim(Cells(i, 3))) = UCase(Trim("%")) Then
            
            PageBreak = xlPageBreakManual
            End With

Ou seja: sempre que a pessoa quiser colocar uma quebra de linha, basta selecionar no dropbox a opção "%" que a macro vai entender que é naquela linha que tem que quebrar a página.