조건속에서 셀 너비 맞추기.

Question

사진과 같이 1행에 여러개의 셀로 분할이 되어있습니다.
여기서 회색음영처리 된 세개의 셀(전공, 학번, 성명)끼리,
그 다음 작성하는 칸인 3개의 흰색 셀끼리,
이런식으로 너비를 동일하게 조절하고 싶습니다.
연속으로 선택된 셀 들을 동일한 간격으로 배분하는 기능밖에는없는 것으로 보이는데, 이런 경우에는 어떻게 해야 하나요? https://drive.google.com/file/d/1-7IHg62wYKVn36yl6TgCHe36fQMfNLno/view?usp=sharing

Answer 1

이 응답은 자동으로 번역되었습니다. 따라서 문법 오류 또는 이상한 표현이 있을 수 있습니다.

안녕하세요. Sam00_449 고객님.

Microsoft Community에 오신 것을 환영합니다.

회색으로 음영된 셀("전공", "학번", "이름"의 열 레이블)과 아래 행의 흰색 셀의 너비가 같도록 Microsoft Word에서 셀의 너비를 조정하려면 다음과 같이 하십시오.

1. 클릭하고 드래그하여 회색으로 음영 처리된 셀의 세 열을 선택합니다.
2. "Table Tools" 아래의 "Layout" 탭으로 이동합니다. "Cell Size" 그룹을 클릭한 다음 "Distribute Columns"를 클릭합니다. 이렇게 하면 선택한 열의 너비가 같아집니다.
3. 음영 처리 된 열 아래에 흰색으로 표시된 세 개의 열에 대해 이 과정을 반복합니다. 이렇게 하면 세 개의 열로 구성된 두 집합의 너비가 모두 같아집니다.

또는 정확한 너비를 자동으로 설정하려면 (고급 방법이있을 수 있으므로 아래에서 확인하십시오) :

스크립트나 매크로를 사용하여 Microsoft Word에서 열 너비를 조정하는 프로세스를 자동화할 수도 있으며 VBA(Visual Basic for Applications)를 사용할 수 있습니다. 아래에서는 테이블에서 지정된 열의 너비를 자동으로 동일하게 설정하는 VBA 매크로를 제공합니다.

사용할 수 있는 VBA 매크로 코드는 다음과 같습니다.

하위 SetUniformColumnWidths()

   테이블로 희미한 tbl

   Dim colWidth를 단일로

   Dim i를 정수로

   ' 문서에 표가 포함되어 있는지 확인

   ActiveDocument.Tables.Count = 0이면

       MsgBox "문서에 표가 없습니다."

       Sub 종료

   다음 경우 종료

   ' 여기에 테이블 인덱스를 설정하고 첫 번째 테이블의 경우 1을 설정합니다.

   tbl = ActiveDocument.Tables(1) 설정

   ' 지정된 열의 평균 너비 계산

   colWidth = 0

   For i = 1 To 3  ' 필요에 따라 범위를 변경합니다.

       colWidth = colWidth + tbl입니다. 열(i). 너비

   다음 i

   colWidth = colWidth / 3  ' 열 수와 일치하도록 제수를 변경합니다.

   ' 각 열의 너비를 평균으로 설정합니다.

   For i = 1 To 3  ' 필요에 따라 범위를 변경합니다.

      TBL입니다. 열(i). 너비 = colWidth

   다음 i

   ' 필요한 경우 다음 열 집합에 대해 반복합니다.

   For i = 4 To 6  ' 필요에 따라 이 범위를 조정하십시오.

      TBL입니다. 열(i). 너비 = colWidth

   다음 i

   MsgBox "열 너비가 조정되었습니다."

최종 하위

Word에서이 매크로를 사용하는 방법 :

• Microsoft Word를 엽니다.
• Alt+F11을 눌러 VBA 편집기를 엽니다.
• VBA 편집기에서 > 모듈 삽입으로 이동하여 새 모듈을 만듭니다.
• 제공된 VBA 스크립트를 모듈 창에 붙여넣습니다.
• VBA 편집기를 닫습니다.
• ALT + F8을 눌러 매크로를 실행하고, SetUniformColumnWidths를 선택하고, 실행을 누릅니다.

이렇게 조정하면 단의 너비가 균일해지고 문서 전체에 깔끔하게 정렬됩니다. 이에 대한 추가 지원이 필요하거나 다른 방법을 제안하고 싶다면 알려주십시오. 감사!

감사합니다

한나.Z- MSFT |Microsoft 커뮤니티 지원 전문가