2014-05-13 3 views
0

테이블을 다루는 코드에 문제가 있습니다. 특히 코드가이를 무시하도록합니다. 이 코드를 테이블에 적용하지 않으므로 "Selection.Information (wdWithInTable) = False"를 사용하여 내용을 지울 수 있습니다. 불행히도 나는 스크립트가 현재 작동하는 단락을 선택하는 방법을 모른다.MSword 테이블을 무시하는 스크립트 필요 - 아마도 간단한 문법의 문답

나는 Selection.Paragraphs(i).Range.Select을 ****에 넣으려고했지만 테이블의 첫 번째 행에 대한 작업을 제거하지 못했고 이유를 알지 못합니다. 저는 VBA와 구문에 익숙하지 않으므로 문제가 있다고 가정하고 있습니다. 이 문장으로

Dim prePara As Paragraph 
Dim curPara As Paragraph 
Dim nextPara As Paragraph 

For i = 2 To ActiveDocument.Paragraphs.Count 

    Set prePara = ActiveDocument.Paragraphs(i - 1) 
    Set curPara = ActiveDocument.Paragraphs(i) 


    If curPara.LeftIndent <= prePara.LeftIndent And curPara.Style = "Normal" Or curPara.Style = "List Paragraph" Then 

     ***** 'here is where I tried Selection.Paragraphs(n).Range.Select but it didn't work 
     If Selection.Information(wdWithInTable) = False Then 
      If curPara.LeftIndent < prePara.LeftIndent Then 
       curPara.LeftIndent = prePara.LeftIndent 
      End If 
     End If 
    End If 
Next 

답변

1

:

Selection.Paragraphs(i).Range.Select 

당신은 선택 개체를 선택하려고합니다.

보십시오 : 나를 위해 그를 clearning에 대한

ActiveDocument.Paragraphs(i).Range.Select 
+0

감사합니다. 그것은 작동하고 대본은 나의 목표를 성취했습니다. –