Hi cogniziant here is the code. Apply any style for the text in the cell and using style u can find ^13 through ole I written the code below if u want this for each cell use the find code in do..while loop
use Win32::OLE; use Win32::OLE qw(in with); use Win32::OLE::Const 'Microsoft Word'; $word=Win32::OLE->GetActiveObject('Word.Application'); $doc= $word->activedocument; $rng = $doc->{range}; $rng = $doc->{range}; $rng->find->clearformatting; $rng->find->replacement->clearformatting; $rng->find->{style}="tbl"; $rng->find->execute({findText=>"^13",wrap=>wdFindStop}); $rng->find->found; $rng->select;
Regards,
Gubendran.
In reply to Re: To Find a Enter symbol inside table cell in MS Word
by gube
in thread To Find a Enter symbol inside table cell in MS Word
by cognizant
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |