#Define wdReplaceOne 1 #Define wdTextFrameStory 5 &&word constant *define range NewRange = oDoc.StoryRanges(wdTextFrameStory) With NewRange.Find *look for your bookmark in this range *this example is looking for text, I haven't done bookmarks .text = "!lcText!" .MatchCase = .F. .Format = .F. lFound = .Execute(,,,,,,,1,,lcText,wdReplaceOne) EndWith>Hi Ken,
>#Define wdReplaceOne 1 >#Define wdTextFrameStory 5 &&word constant > >*define range >NewRange = oDoc.StoryRanges(wdTextFrameStory) >With NewRange.Find > *look for your bookmark in this range > *this example is looking for text, I haven't done bookmarks > .text = "!lcText!" > .MatchCase = .F. > .Format = .F. > lFound = .Execute(,,,,,,,1,,lcText,wdReplaceOne) >EndWith >>