Premik vrstice do roba

[RTM]

Pozdravljeni!

Trudim se toda ne uspem rešiti naslednje težave:

Rodoslovni program My Heritage Family Tree mi izpiše podatke v datoteki DOCX, kjer uspešno obrnem ležečo v pokončno obliko in postavim robove (levi in desno za 2,5 cm od roba papirja), ki so primerni za obojestranski izpis in vezavo v spiralo.
Dokument ima takšen zgled:

Prvih 5 vrstic sem z uporabo Wordove funkcije 'Samodejno prilagodi oknu' premaknil v vidno okno tako, da je desni rob odmaknjen za 2,5 cm. To sem tudi posnel in dobil naslednji makro:


Problem je, da ne znam oziroma mi ne uspe makro avtomatizirati tako, da bo premike desnega roba izvršil od začetka do konca dokumenta.

[admin]

Pozdravljeni,

ker vašega konkretnega dokumenta ne poznam lahko samo popravim vaš obstoječ makro tako, da prilagodi VSE tabele v dokumentu, torej:

Koda: Izberi vse

Option Explicit

Sub PopraviVseTabele()
'
' www.matjazev.net 24.06.2018
'
'
  Dim tbl As table
  
  For Each tbl In ActiveDocument.Tables
    tbl.AutoFitBehavior (wdAutoFitWindow)
  Next
End Sub

[RTM]

Pozdravljeni!

Deluje kot grom, od začetka do konca ter poravna vse desne robove

Prisrčna hvala.