"S" (perché le persone non possono firmare la loro e-mail con almeno un nome?) Ha scritto la domanda di oggi.
Sto cercando di inserire automaticamente le interruzioni di pagina in una tabella in Excel. Ho provato Data - Subtotals, ma questo mi costringe ad aggiungere una somma o un conteggio. Non voglio alcun subtotale, solo un'interruzione di pagina ogni volta che il valore nella colonna A cambia.
Questa macro risolverà il problema. Per qualche motivo, l'esecuzione delle macro che modificano le interruzioni di pagina o le impostazioni di pagina richiede molto tempo, ma sarà sicuramente più veloce che eseguire il processo manualmente. La macro presume che i tuoi dati siano nella colonna A e che inizi nella riga 2.
Sub AddBreaks() StartRow = 2 FinalRow = Range("A65536").End(xlUp).Row LastVal = Cells(StartRow, 1).Value For i = StartRow To FinalRow ThisVal = Cells(i, 1).Value If Not ThisVal = LastVal Then ActiveSheet.HPageBreaks.Add _ before:=Cells(i, 1) End If LastVal = ThisVal Next i End Sub
