Sub IncludeBracketInSentence()
' Paul Beverley - Version 11.08.23
' Moves the full point to after the bracketed reference

Selection.Expand wdWord
Selection.Collapse wdCollapseEnd
Selection.MoveEnd , 1
Selection.Cut
Selection.Expand wdParagraph
Selection.Collapse wdCollapseEnd
Selection.MoveLeft , 1
Selection.Paste
End Sub