"S" (hvorfor kan ikke folk signere e-posten sin med minst et fornavn?) Skrev dagens spørsmål.
Jeg prøver å automatisk sette sideskift i en tabell i Excel. Jeg prøvde Data - Delsummer, men det tvinger meg til å legge til en sum eller et antall. Jeg vil ikke ha noen delsummer, bare et sideskift når verdien i kolonne A endres.
Denne makroen vil løse problemet. Av en eller annen grunn tar det lang tid å kjøre makroer som endrer sideskift eller sideoppsett, men dette vil absolutt være raskere enn å gjøre prosessen manuelt. Makroen antar at dataene dine er i kolonne A, og at de starter i rad 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
