Tony
Mon Jan 21 03:39:48 PST 2008
On the plus side, you're making progress :)
Document content is held in several parts, called Stories, which come
together to produce the display (or print). What you have been working with
so far (Activedocument.Range) is the Main Text Story and within that you
have seen a placeholder for your textbox (\x01, more generally a placeholder
for a graphic). The test inside the Textbox is held as a TextRange within a
TextFrame within the Textbox Shape. It is also part of the document's
TextFrame Story (which is actually a series of stories, one per Textbox or,
strictly, one per chain of textboxes - if you have linked ones).
You can access the series of TextFrame Stories from the selection by
starting with ...
Set MyRange = ActiveDocument.StoryRanges(Selection.StoryType)
... and then iterating over them with ...
Set MyRange = MyRange.NextStoryRange
... but this is probably not the best way for you - although it does work
whether in a Textbox or the Main Text - or any other story.
What is probably better is to identify, first of all, that your Selection is
in a Textbox (Selection.StoryType = wdTextFrameStory) and then look at
Selection.ShapeRange.TextFrame.TextRange, which is a Range just like
Application.Range (and can, itself contain nested textboxes, etc.). You can
process the Characters in this Range in the same way you processed those in
the main document.
--
Enjoy,
Tony
<anders.johansen@gmail.com> wrote in message
news:490dcb53-f2ab-40b4-afde-ac503d48b3a0@d70g2000hsb.googlegroups.com...
On Jan 19, 11:52 am, "Tony Jollans" <My forename at my surname dot
com> wrote:
> ... in your example \x01\x15 is a single Character (Range) object, and
> thus
>
> ActiveDocument.Range( _
> ActiveDocument.Range.Characters(8).Start, _
> ActiveDocument.Range.Characters(12).End)
>
> (deliberately spread over three lines to stop the newsreader breaking it
> inappropriately)
>
> ... will return the Range containing the visible "world".
All right, that works pretty much the way I wanted, and having banged
it sufficiently over its head, it now works exacly as it should...
Thank you very much for your help!
Now I have another problem.
Say I have a document that looks like this:
------------------
TEXT BOX BEGINS
Hello world
TEXT BOX ENDS
Goodbye world
------------------
...and my cursor is in the text box ("Hello world").
When using Application.ActiveDocument.Characters, I get the Characters
in the "actual" document, e.g. "Goodbye world".
This also happens if instead of ActiveDocument, I use
Selection.Document.
What do I do, if instead I want to get the Characters range that the
cursor is currently on, e.g. "Hello world" if the cursor is in the
text box, and "Goodbye world" if it is not?
Anders