Jak umístit text v závorkách do poznámky pod čarou aplikace Word 2016

Jedním z hříchů, kterých se můžete dopustit při psaní semestrální práce nebo diplomové práce, je umístění příliš mnoha poznámek v závorkách na stránku. Mnoho profesorů oceňuje, když místo toho používáte poznámky pod čarou. Oceníte také makro parenthetical_to_footnote, které proces automatizuje.

K záznamu tohoto makra byly použity klávesové zkratky, ale aby fungovalo, musí být kurzor přesně umístěn: Klepněte na kurzor před větu v závorce těsně před tečku, kde se má zobrazit poznámka pod čarou. Obrázek znázorňuje umístění a výsledek po spuštění makra.

Spuštění makra parenthetical_to-footnote.

Sub parenthetical_to_footnote()

'

' parenthetical_to_footnote Macro

' Převést text v závorkách za kurzorem na poznámku pod čarou

'

Selection.Extend

Selection.Extend Character:="("

Selection.EscapeKey

Selection.MoveRight Jednotka:=wdCharacter, Count:=1

Selection.Extend

Selection.Extend Character:=")"

Selection.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend

Selection.Cut

Selection.MoveRight Jednotka:=wdCharacter, Count:=1

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeText Text:="."

Selection.MoveLeft Unit: = wdCharacter, Count: = 1

s výběrem

S .FootnoteOptions

.Location = wdBottomOfPage

.NumberingRule = wdRestartContinuous

.StartingNumber = 1

.NumberStyle = wdNoteNumberStyleArabic

.LayoutColumns = 0

End With

.Footnotes.Add Rozsah: = Selection.Range, Reference:=""

End With

Selection.Paste

End Sub

K vytvoření tohoto makra byly použity následující klávesy. Jsou docela složité:

Stiskněte F8 a poté znak ( (levá závorka).
Příkaz F8 vstoupí do režimu rozšířeného výběru. Když stisknete klávesu, jako je klávesa (, vybere se text až do tohoto znaku včetně.

Esc, →
Výběr se zruší a klávesa → přesune kurzor na začátek textu v závorce.

F8, )
Text je vybrán až do znaku ) včetně.

←
Znak ) je odstraněn z výběru.

Ctrl+X
Text v závorkách se vyjme. Dalších několik úhozů odstraníte závorku a umístíte kurzor na poznámku pod čarou.

Backspace, Backspace, Backspace, Backspace, . (tečka), ←

Klepněte na kartu Reference a ve skupině Poznámky pod čarou klepněte na tlačítko Vložit poznámku pod čarou.

Ctrl+V
Text se vloží do poznámky pod čarou.