Como inserir texto entre parênteses em uma nota de rodapé do Word 2016

Um dos pecados que você pode cometer ao escrever um trabalho de conclusão de curso ou tese é colocar muitas notas entre parênteses em uma página. Muitos professores apreciam quando você usa notas de rodapé. Você também apreciará a macro parenthetical_to_footnote, que automatiza o processo.

As teclas foram usadas para gravar esta macro, mas o ponteiro de inserção deve estar precisamente posicionado para que funcione: Clique no ponteiro de inserção antes da frase entre parênteses, logo antes do período onde deseja que a nota de rodapé apareça. A figura ilustra o posicionamento e o resultado após a execução da macro.

Executando a macro parenthetical_to-footnote.

Sub parenthetical_to_footnote ()

'

' parenthetical_to_footnote Macro

'Converte o texto entre parênteses seguindo o cursor em uma nota

de rodapé '

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 Unit: = wdCharacter, Count: = 1

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeBackspace

Selection.TypeText Text: = "."

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

com Seleção

Com .FootnoteOptions

.Localização = wdBottomOfPage

.NumberingRule = wdRestartContinuous

.StartingNumber = 1

.NumberStyle = wdNoteNumberStyleArabic

.LayoutColumns = 0

End With

.Footnotes.Add Range: = Selection.Range, Referência: = ""

End With

Selection.Paste

End Sub

Os seguintes pressionamentos de tecla foram usados ​​para criar esta macro. Eles são muito complexos:

Pressione F8 e, em seguida, o caractere ((parêntese esquerdo).
O comando F8 entra no modo de seleção estendida. Quando você pressiona uma tecla, como a tecla (, o texto é selecionado até e incluindo esse caractere.

Esc, → A
seleção é cancelada e a tecla → move o ponteiro de inserção para o início do texto entre parênteses.

F8,) O
texto é selecionado até e incluindo o caractere).

←
O caractere) é removido da seleção.

Ctrl + X
O texto entre parênteses é cortado. As próximas teclas removem o parêntese e posicionam o ponteiro de inserção para a nota de rodapé.

Backspace, Backspace, Backspace, Backspace,. (ponto final), ←

Clique na guia Referências e, no grupo Notas de Rodapé, clique no botão Inserir Nota de Rodapé.

Ctrl + V
O texto é colado na nota de rodapé.