Ok, I've recorded a quickie macro to do it. Here it is if anyone's interested. for convenience I assigned a keyboard shortcut to invoke this macro.

Sub MarkAsChanged()
'
Selection.Cut
ActiveDocument.TrackRevisions = Not ActiveDocument.TrackRevisions
Selection.Paste
ActiveDocument.TrackRevisions = Not ActiveDocument.TrackRevisions
End Sub