Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Word Automation, select range of a page
Message
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
00929891
Message ID:
00929960
Views:
11
Hello Mike,

Not sure how I will make use of this info, but it could be helpful, I'll have to think about it a bit.

Thanks

Bob

>This might might be part of the solution. Here is how to determine what page you are on, and allows you to skip a page if need be.
>
oWord = createobject('word.application')
>odocument=oWord.Documents.Open('c:\all products') && Multiple page document.
>oDocument.Repaginate  && Just to make sure the page count is right.
>DO WHILE oWord.selection.Information(3)<> oWord.Selection.Information(4)
>       MESSAGEBOX( "The cursor is on page " +TRANSFORM(oWord.selection.Information(3)) + " of page "+;
>        TRANSFORM(oWord.Selection.Information(4)))
>    oWord.Browser.Next && Skip a Page
>ENDDO
>
>>Hello Mike,
>>
>>Good idea, but I would like to use existing documents, I would think there would be a end of page marker of some sort?
>>
>>Thanks for the input
>>
>>Bob
>>
>>>I would suggest that every time you merge a document, you add a recognizable bookmark, that will permit you select a range between two bookmarks.
>>>
>>>>Hello All,
>>>>
>>>>Playing around with some Word Automation to produced a merged document from several word documents. I need a code snippit to select a page as a range and put it into the copy buffer. All I see is info on doing ranges by section, paragraph, etc but not by page.
>>>>
>>>>Thanks in advance
>>>>
>>>>Bob
'If the people lead, the leaders will follow'
'War does not determine who is RIGHT, just who is LEFT'
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform