Solved: How I'll find a character position in a word document?

[Grigoras]

Hi!I want to now the VBA code to find the first position of a character (@for example) in a word document. (document.@character) @ can be finded in many places , but I want to know position of the first @ in the document.

Thanks,:help

[Tinbendr]

Sub FindCharacterPosition()
Dim MyRange As Range
Set MyRange = ActiveDocument.Range
MyRange.Find.Execute FindText:="@"
MsgBox "Position = " & MyRange.Start
End Sub

[TonyJollans]

With ActiveDocument.Range
If .Find.Execute("@") Then MsgBox .Start
End With