VBA (Word 2010)에서 병합 된 표 셀의 너비 변경

Question

MS Word 2010에서는 병합 된 셀의 너비를 약간 변경하는 경우가 있습니다.

간단한 2 x 2 테이블을 상상해보십시오. 상단 행의 셀이 병합되고 두 번째 행의 셀은 병합되지 않습니다. (워드 인덱스를 사용하여) (1, 2) 셀의 위치 및 폭이 변화에 커서가 다음 상단 행의 폭은 "활성"셀과 동일하게 변경 될 경우

. 의도 한대로, 그러나, 선택 후, 숨겨진 문자 "행의 끝"을 포함 변경하도록 확장되어있는 경우

만 선택한 셀에 영향을 미친다.

누구나 VBA에서이 동작을 복제하는 방법을 알고 있습니까?

건배

댄

Answer 1

는 경우 사용자 Cell.Select 다음 행동이 내가 원하는대로이라고 밝혀

With Selection.Table(1) 
    .Cell(1, 1).Select 
    .Selection.Cells.Width = MillimetersToPoints(150) 
    .Cell(2, 1).Select 
    .Selection.Cells.Width = MillimetersToPoints(150) 
    .Cell(3, 1).Select 
    .Selection.Cells.Width = MillimetersToPoints(50) 
    .Cell(3, 2).Select 
    .Selection.Cells.Width = MillimetersToPoints(100) 
End With