m54-b
2023.04.02
|
|
0 0
917
|
Nekem a teszt szövegben az első oldal eltérő volt beállítva, azért működött. Módosítottam a makrót
Sub utolso_lablec_torles()
Selection.GoTo What:=wdGoToPage, Which:=wdGoToLast Selection.InsertBreak Type:=wdSectionBreakNextPage ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter Selection.HeaderFooter.LinkToPrevious = Not Selection.HeaderFooter. _ LinkToPrevious x = ActiveDocument.Sections.Count With ActiveDocument.Sections(x) .Footers(wdHeaderFooterFirstPage).Range.Text = "" End With ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
End Sub
Most az első és a jobb-bal oldal eltérőnél működik. |
Előzmény: OldPinokkio (916)
|
|