Viens no grēkiem, ko varat izdarīt, rakstot kursa darbu vai diplomdarbu, ir pārāk daudz iekavu piezīmju ievietošana lapā. Daudzi profesori to novērtē, ja izmantojat zemsvītras piezīmes. Jūs novērtēsiet arī makro parathetic_to_footnote, kas automatizē procesu.
Lai ierakstītu šo makro, tika izmantoti taustiņsitieni, taču, lai tas darbotos, ievietošanas rādītājam ir jābūt precīzi novietotam: noklikšķiniet uz ievietošanas rādītāja pirms iekavas teikuma, tieši pirms perioda, kurā vēlaties parādīt zemsvītras piezīmi. Attēlā parādīta pozicionēšana un rezultāts pēc makro palaišanas.
Palaiž makro iekavās_uz zemsvītras piezīmi.
Sub parenthetical_to_footnote ()
'
' parenthetical_to_footnote Macro
"Pārvērst parenthetical tekstu pēc kursora stāšanās zemsvītras piezīmi
"
Selection.Extend
Selection.Extend Raksturs: = "("
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 Unit:=wdCharacter, Count:=1
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeBackspace
Selection.TypeText Text:="."
Selection.MoveLeft vienība: = wdCharacter, Count: = 1
Ar atlases
Ar .FootnoteOptions
.Location = wdBottomOfPage
.NumberingRule = wdRestartContinuous
.StartingNumber = 1
.NumberStyle = wdNoteNumberStyleArabic
.LayoutColumns = 0
End Ar
.Footnotes.Add diapazons: = Selection.Range, Atsauce:=""
Beigt ar
atlasi.Ielīmēt
Beigt apakšā
Lai izveidotu šo makro, tika izmantoti šādi taustiņsitieni. Tie ir diezgan sarežģīti:
Nospiediet F8 un pēc tam rakstzīmi ( (kreisā iekava).
Komanda F8 pāriet paplašinātās atlases režīmā. Nospiežot taustiņu, piemēram, taustiņu (, teksts tiek atlasīts līdz šai rakstzīmei ieskaitot.
Esc, →
Atlase tiek atcelta, un taustiņš → pārvieto ievietošanas rādītāju uz iekavas teksta sākumu.
F8, )
Teksts tiek atlasīts līdz rakstzīmei ) ieskaitot.
←
) rakstzīme tiek noņemta no atlases.
Ctrl+X
Iekavas teksts tiek izgriezts. Nākamie daži taustiņsitieni noņem iekavas un novieto zemsvītras piezīmes ievietošanas rādītāju.
Backspace, Backspace, Backspace, Backspace, . (periods), ←
Noklikšķiniet uz cilnes Atsauces un grupā Zemsvītras piezīmes noklikšķiniet uz pogas Ievietot zemsvītras piezīmi.
Ctrl+V
Teksts tiek ielīmēts zemsvītras piezīmē.