Hi Monks,
I can able to open a doc file and find the text.
Problem is how to replace it.
use strict; use Win32::OLE; use Win32::OLE::Const 'Microsoft Word'; my $word = Win32::OLE->new('Word.Application'); $word->{Visible} = 1; my $document=$word->Documents->Open('c:/temp/test.doc'); $word->Selection->HomeKey(wdStory); $word->Selection->Find->{'Text'}='Some Text'; $word->Selection->Find->Replacement->{'Text'}='Replaced Text'; $word->Selection->Find->Execute(); ### Need help here
Thanks,
Kanishk
In reply to Replace word in Win32::OLE by kanish
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |