„S” (dlaczego ludzie nie mogą podpisywać swoich e-maili przynajmniej imieniem?) Napisał dzisiejsze pytanie.
Próbuję automatycznie wstawiać podziały stron do tabeli w programie Excel. Próbowałem Dane - Sumy pośrednie, ale to zmusza mnie do dodania Sumy lub Licznika. Nie chcę żadnych sum pośrednich, tylko podział strony za każdym razem, gdy zmienia się wartość w kolumnie A.
To makro rozwiąże problem. Z jakiegoś powodu makra zmieniające podziały stron lub ustawienia stron zajmują dużo czasu, ale z pewnością będzie to szybsze niż wykonywanie tego procesu ręcznie. Makro zakłada, że dane znajdują się w kolumnie A i zaczynają się w wierszu 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
