Results 1 to 1 of 1
  1. #1
    Join Date
    Nov 2004
    Posts
    1

    Arrow Unanswered: VBA - Customised Numbered Lists loosing alignment Word MACRO

    Hi all, and thanks in advance.... cos i know u genious ppl will surrely able to fix this problem!!

    Actually I am working in VBA and i wanted to convert all the Numbered and Bulleted lists inside a MS Word Document to plain text for which i use the following Macro.



    Sub RemoveLists()
    Dim i As Integer
    i = 1
    While i <= ActiveDocument.Lists.Count
    ActiveDocument.Lists(i).Range.Copy
    ActiveDocument.Lists(i).ConvertNumbersToText wdNumberParagraph
    i = i + 1
    Wend

    If ActiveDocument.Lists.Count > 0 Then
    Call RemoveLists
    End If
    End Sub


    This Code works fine for all the lists in the Word document except for the User Customised ones. For Eg.
    in the attached TEST.DOC, the numbered text is unexpectedly loosing its alignment when i run the above macro..
    I want to replace the List with a plain text as though manually typed.
    Please help me....with a solution to this....

    Eagerly waiting....
    Attached Files Attached Files

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •