Re^2: Using OLE to view given Paragraph in MS Word Document

[Ray Smith]

Thanks for the example.

I tried it, first:
1. using my own test file.
2. Changing to use 5.10, because that's what I have.
3. use abs_path(input) file because Word appears to require absolute path.

Things operate with out error, but my Windows display still leaves the cursor at the beginning of the file.

Am I missing something here?

[ricDeez]

I don't really understand what you want to do!

If you need to view the paragraphs being selected you could add the following:

for my $i ( 1 .. $paragraphs->Count()){
    last if $i > $ParaNo; 
    $paragraph = $paragraphs->Item( $i );
    $paragraph->{Range}->Select(); # <<<<<Added
    sleep(1);                      # <<<<<Added
    my $style = $paragraph->{Style}->{NameLocal};
    my $text = $paragraph->{Range}->{Text};
    print "style=$style text=$text\n";
}

I have used placed the sleep in the loop so that you can see the paragraphs being selected in turn, otherwise it would just happen too quickly - especially since you are only interested in the first 10 paragraphs!

[Ray Smith]

Your advice was spot on! This is what I was missing, to view the specified paragraph:

    $paragraph = $paragraphs->Item( $i );
    $paragraph->{Range}->Select(); # <<<<<Added

I appologize for not being clear. I have a simple application that uses Microsoft Word for user generated input source. My goal, which I can now approach with your help, is, when an error in this user input file is discovered, to bring up the source file with the view positioned to facilitate the user making required modifications to correct the error(s).

Thanks again for the help.

[ricDeez]

I am glad to be of help. I am fairly new to Perl myself but have quite a bit of experience in developing MS Office automation applications. They are just more fun doing in Perl!