Thank You very Much. This issue was becoming a big problem for me. It has
been solved. Thanks Again. Now I have to save individual pages without
changes in formatting.

Thanks Once Again
Renjith

"Jezebel" wrote:


"Renjith" wrote in message
...
Hi

This is working!!! Thank you very much. But now the question asyou
mentioned below is how to differentiate between Bulletted and
Non-Bulletted
paragraphs. Any idea how to solve this problem??

Dim pPar as word.paragraph
For each pPar in Activedocument.Paragraphs
If not pPar.Range.ListFormat.ListTemplate is nothing then
... Bulleted
end if
Next