Viv, I just wanted to say thanks! Your sample code really helped me out, as I too ran into the over 254 char replacement issue.
-Mark

>Hi,
>I think the maximum string length using this method is 254. Something like the following should work:
>

>IF LEN(lcString) < 254
>  WITH THIS.oWordDoc.Content.FIND
>    .TEXT = lcSearchString
>    .FORMAT = .F.
>    .MatchCase = .T.
>    .Replacement.TEXT = lcString
>    .Execute(,,,,,,,,,,2)		&& 2 = Replace all
>  ENDWITH
>ELSE
>  * Can't use simple find/replace because replacement string is too long....
>  DO WHILE .T.
>    loRange = THIS.oWordDoc.RANGE(0,0)
>    WITH loRange.FIND
>      .TEXT = lcSearchString
>      .FORMAT = .F.
>      .MatchCase = .T.
>      llFound = .Execute()
>      IF llFound
>        loRange.TEXT = lcString
>      ELSE
>        EXIT
>      ENDIF
>    ENDWITH
>  ENDDO
>ENDIF
>

>HTH,
>Viv