Eden od grehov, ki jih lahko storite pri pisanju seminarske naloge ali diplomske naloge, je, da na stran postavite preveč opomb v oklepaju. Mnogi profesorji cenijo, če namesto tega uporabite opombe. Cenili boste tudi makro parenthetical_to_footnote, ki avtomatizira postopek.
Za snemanje tega makra so bili uporabljeni pritiski na tipke, vendar mora biti kazalec za vstavljanje natančno nameščen, da deluje: Kliknite kazalec za vstavljanje pred stavkom v oklepaju, tik pred piko, kjer želite, da se prikaže opomba. Slika prikazuje pozicioniranje in rezultat po zagonu makra.
Zagon makra oklepaja_na sprotno opombo.
Sub parenthetical_to_footnote()
'
' parenthetical_to_footnote Macro
' Pretvori oklepaje, ki sledi kazalcu v opombo pod črto
'
Selection.Extend
Selection.Extend Character:="("
Selection.EscapeKey
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.Extend
Selection.Extend Character:=")"
Selection.MoveLeft Enota:=wdCharacter, Count:=1, Extend:=wdExtend
Selection.Cut
Selection.MoveRight Enota:=wdCharacter, Count:=1
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeText Text:="."
Selection.MoveLeft Enota: = wdCharacter, Count: = 1
pri izbiri
Z .FootnoteOptions
.Location = wdBottomOfPage
.NumberingRule = wdRestartContinuous
.StartingNumber = 1
.NumberStyle = wdNoteNumberStyleArabic
.LayoutColumns = 0
End With
.Footnotes.Add razpon: = Selection.Range, Referenca:=""
Konec z
izborom.
Prilepi Končni pod
Za ustvarjanje tega makra so bili uporabljeni naslednji pritiski tipk. So precej zapleteni:
Pritisnite F8 in nato znak ( (levi oklepaj).
Ukaz F8 vstopi v način razširjene izbire. Ko pritisnete tipko, kot je tipka (, je besedilo izbrano do vključno tega znaka.
Esc, →
Izbira je preklicana, tipka → pa premakne kazalec za vstavljanje na začetek besedila v oklepaju.
F8, )
Besedilo je izbrano do vključno znaka ).
←
Znak ) je odstranjen iz izbora.
Ctrl+X
Besedilo v oklepaju je izrezano. Naslednjih nekaj pritiskov tipk odstrani oklepaje in postavi kazalec za vstavljanje za sprotno opombo.
Backspace, Backspace, Backspace, Backspace, . (obdobje), ←
Kliknite zavihek Reference in v skupini Opombe kliknite gumb Vstavi sprotno opombo.
Ctrl+V
Besedilo je prilepljeno v opombo.