Select words macro

Hello,
can you help me to write simple macro to select text starting from current position of keyboard cursor to position of round bracket "(". The bracket should not be in the selection. Information for backward compatibility: I need this for Word XP.

That's as simple as:

Code:

---

Sub Demo()
Selection.MoveEndUntil "(", wdForward
End Sub

---

Thank you.