É para apagar os dados ou excluir a linha?

Se apagar vai apagar apenas a celula em questao ou toda a linha?

Se houver duas palavras seguidas ou em um intervalo pequeno vai inserir a quebra de pagina assim mesmo?

Esta ultima pergunta se deve pelo fato de que se vc tiver por exemplo a palavra na linha 10 e outra na linha 12 seram 2 quebras de pagina em um intervalo de dados muito pequeno, o que vai causar uma formatação muito estranha.

Qual o objetivo alem do que parece obvio?

Consegui resolver com o código:

'INSERIR QUEBRA DE PÁGINAS
   Dim i As Long

    For i = 2 To Cells.Rows.Count
        
        If Cells(i, 1) = "*NUMERO DO ATIVO :*" Then
            Rows(i).Select
            SendKeys ("{DOWN}" 3),
            ActiveCells.ClearContents
            ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell
            
        End If
    
    Next i
'FIM DE INSERIR QUEBRA DE PÁGINAS

A ideia era justamente dividir as páginas de um relatório..
Agora deu Certo.. Agradeço..