Word 2007 : 목록에서 글 머리 기호를 제거하는 매크로

Question

Word 2007 문서에서 모든 글 머리 기호를 제거하려고합니다. 그것은 매우 큰 문서이므로 매크로를 사용하여이 문제를 해결하려고했습니다. 나는 오피스 스위트 나 VBA 스크립팅에 대한 경험이 없기 때문에 약간 혼란 스럽다.

나는 인터넷에서 발견 한 다른 해결책을 시도했다. 목록에 새 템플릿을 적용한 스크립트를 발견했다. 그것은이 같은했다 :

Sub ReplaceBullets() 
    Dim oPara As Paragraph 

    For Each oPara In ActiveDocument.Paragraphs() 
     Set r = oPara.Range 
     If r.ListFormat.ListType = wdListBullet Then 
      r.ListFormat.ApplyListTemplate _ 
      ListTemplate:=ListGalleries(wdNumberGallery) _ 
       .ListTemplates(1) 
     End If 
     Set r = Nothing 
    Next 
End Sub 

을하지만 느릅 나무의 범위 내가 "ListTemplates을"의 선택 내가 필요로하는, "없음"을 제외하지, 1 ~ 7로 이동 할 수있는 문서에서 보았다.

나는 또한 "r.ListFormat.ApplyBulletDefault"메서드를 사용하여 목록 템플릿을 변경하지 않고 기본 스타일이 "none"이 되길 바랬습니다. 분명히 문서의 기본 스타일이 "none"인 경우에만 작동합니다. 나는

당신 :

Answer 1

하면 감사

나는 누군가가 나에게 좋은 조언을 줄 수 있기를 바랍니다

.. ..하지만 운 문서 기본 글 머리 기호 스타일을 얻기 위해 그것을 변경하는 방법을 이해하려고 노력 당신은 글 머리 기호를 제거하고 총알, 아니 목록 단락, 그냥 텍스트로 변환하려면이 라인은 속임수를 할 것입니다 (if statement)

r.ListFormat.RemoveNumbers