Hi,
In addition to the possibility of using the Equation Editor, you can use an
EQ field to add a tilde to any letter. To add a tilde to r, do the following.
1. Type EQ \o(r,˜)
The tilde ˜ in this step can be typed by typing 2dc and then pressing Alt+X.
2. Select what you typed in step 1.
3. Press Ctrl+F9.
4. Press F9.
You can also add a tilde to any letter by placing the cursor after the
letter and running the following macro.
Sub Tilde()
Dim myField As Field
Dim myChar As String
With Selection
.MoveStart Unit:=wdCharacter, Count:=-1
myChar = .Text
.Delete
Set myField = ActiveDocument.Fields.Add(Range:=.Range, _
Type:=wdFieldEmpty, PreserveFormatting:=False)
myField.Code.Text = "EQ \o(" & myChar & "," & ChrW(&H2DC) & ")"
myField.ShowCodes = False
.MoveRight Unit:=wdCharacter, Count:=1
End With
Set myField = Nothing
End Sub