Jedan od grijeha koje možete počiniti u pisanju seminarskog rada ili diplomskog rada je stavljanje previše bilješki u zagradi na stranici. Mnogi profesori cijene kada umjesto toga koristite fusnote. Također ćete cijeniti makronaredbu parenthetical_to_footnote, koja automatizira proces.
Pritisci na tipke korišteni su za snimanje ove makronaredbe, ali pokazivač za umetanje mora biti točno pozicioniran da bi funkcionirao: Kliknite pokazivač za umetanje prije rečenice u zagradi, neposredno prije točke u kojoj želite da se fusnota pojavi. Slika ilustrira pozicioniranje i rezultat nakon pokretanja makronaredbe.
Pokretanje makronaredbe zagrade_za fusnotu.
Sub parenthetical_to_footnote()
'
' parenthetical_to_footnote Macro
' Pretvori tekst u zagradi nakon kursora u fusnotu
'
Selection.Extend
Selection.Extend Character:="("
Selection.EscapeKey
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.Extend
Selection.Extend Character:=")"
Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.Cut
Selection.MoveRight Jedinica:=wdCharacter, Count:=1
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeText Text:="."
Selection.MoveLeft Jedinica: = wdCharacter, Count: = 1
s izborom
S .FootnoteOptions
.Location = wdBottomOfPage
.NumberingRule = wdRestartContinuous
.StartingNumber = 1
.NumberStyle = wdNoteNumberStyleArabic
.LayoutColumns = 0
Kraj S
.Footnotes.Add Raspon: = Selection.Range, Referenca:=""
Kraj s
odabirom. Zalijepi
kraj podnožja
Sljedeće tipke su korištene za stvaranje ove makronaredbe. Oni su prilično složeni:
Pritisnite F8, a zatim znak ( (lijeva zagrada).
Naredba F8 ulazi u način proširenog odabira. Kada pritisnete tipku, kao što je tipka (, tekst se odabire do i uključujući taj znak.
Esc, →
Odabir se poništava, a tipka → pomiče pokazivač umetanja na početak teksta u zagradama.
F8, )
Tekst se odabire do i uključujući znak ).
←
Znak ) je uklonjen iz odabira.
Ctrl+X
Tekst u zagradama je izrezan. Sljedećih nekoliko pritisaka na tipku uklanjaju zagrade i postavljaju pokazivač umetanja za fusnotu.
Backspace, Backspace, Backspace, Backspace, . (razdoblje), ←
Kliknite karticu Reference i u grupi Fusnote kliknite gumb Umetni fusnotu.
Ctrl+V
Tekst se lijepi u fusnotu.