„S” (de ce oamenii nu își pot semna e-mailul cu cel puțin un prenume?) A scris întrebarea de astăzi.
Încerc să pun automat pauzele de pagină într-un tabel în Excel. Am încercat Date - Subtotale, dar asta mă obligă să adaug o sumă sau un număr. Nu vreau niciun subtotal, doar o pauză de pagină ori de câte ori se modifică valoarea din coloana A.
Această macro va rezolva problema. Din anumite motive, macrocomenzile care modifică pauzele de pagină sau configurările paginilor necesită mult timp pentru a rula, dar acest lucru va fi cu siguranță mai rapid decât procesul manual. Macrocomanda presupune că datele dvs. se află în coloana A și că încep în rândul 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