Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?

WIN32::OLE MS Word Replace

by gibsonca (Beadle)
on Oct 15, 2009 at 15:29 UTC ( #801372=perlquestion: print w/replies, xml ) Need Help??
gibsonca has asked for the wisdom of the Perl Monks concerning the following question:

Hi monks!

I can do a simple find and replace, but how do I change the font in the replacement? For example, in the following code segment I want to underline (or bold) just the word 'will', presume it is in a sentence like 'You will go to the store.'.

$selection->{'Find'}->{'Text'} = " will "; $selection->{'Find'}->{'Replacement'}->{'Text'} = "*** will ***"; $selection->{'Find'}->Execute({Replace => wdReplaceOne});

Any help appreciated.

Replies are listed 'Best First'.
Re: WIN32::OLE MS Word Replace
by hominid (Curate) on Oct 15, 2009 at 17:54 UTC
    $selection->{'Find'}->{'Replacement'}->{'Font'}->{'Bold'} = 1
    This should do it. You have been told in other posts how to go about finding solutions to MS Word related automation problems. I would also point out the Word Object Model Reference. For this case look at the Replacement object.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://801372]
Approved by wfsp
Front-paged by tye
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (4)
As of 2017-12-14 19:38 GMT
Find Nodes?
    Voting Booth?
    What programming language do you hate the most?

    Results (408 votes). Check out past polls.