Word 문서의 모든 이미지 주위에 테두리를 그립니다.

Question

Word의 모든 이미지 주위에 테두리를 추가하는 방법이 있습니까? 나는 경계를 가지는 사용자 정의 단락 스타일을 만들고 거기에 이미지를 넣어,하지만 어쩌면 난 그냥 CSS처럼, 글로벌 이미지 스타일을 지정할 수 있습니다 수 있다는 사실을 알고 :

img { border: 1px solid #000 } 

Answer 1

불행히도 사진 스타일의 개념이 없다 Word에서 사용할 수 있습니다. 따라서 CSS와 유사한 이미지에 대해 전역 스타일을 지정하는 것과 같은 것은 불가능합니다.

당신이 할 수있는 일은 모든 이미지에 테두리를 추가하는 VBA 매크로를 작성하는 것입니다.

Sub AddBorderToPictures() 

    ' Add border to pictures that are "inline with text" 
    Dim oInlineShape As inlineShape 
    For Each oInlineShape In ActiveDocument.InlineShapes 
     oInlineShape.Borders.Enable = True 
     oInlineShape.Borders.OutsideColor = wdColorBlack 
     oInlineShape.Borders.OutsideLineWidth = wdLineWidth100pt 
     oInlineShape.Borders.OutsideLineStyle = wdLineStyleSingle 
    Next 

    ' Add border to pictures that are floating 
    Dim oShape As shape 
    For Each oShape In ActiveDocument.Shapes 
     oShape.Line.ForeColor.RGB = RGB(0, 0, 0) 
     oShape.Line.Weight = 1 
     oShape.Line.DashStyle = msoLineSolid 
    Next 

End Sub 

분명히 wdLineWidth100pt에 선 두께를 설정하는 경우이 문제가, 당신은 사용해 볼 수 있습니다 : 코드는 이미지가 텍스트 (InlineShape) 또는 부동 (Shape)와 인라인으로 포맷 여부에 따라 약간 다릅니다 대신 실제 기본 정수 값, 예를 들면 : 이것은 매우 홍보 소리

public enum WdLineWidth 
{ 
    wdLineWidth025pt = 2, 
    wdLineWidth050pt = 4, 
    wdLineWidth075pt = 6, 
    wdLineWidth100pt = 8, 
    wdLineWidth150pt = 12, 
    wdLineWidth225pt = 18, 
    wdLineWidth300pt = 24, 
    wdLineWidth450pt = 36, 
    wdLineWidth600pt = 48, 
}