에이프릴은 Word 문서에 표가 있습니다. 한 행은 회사의 로고 색상과 일치하도록 사용자 정의 색상 채우기로 형식이 지정됩니다. April은 이제 해당 채우기 색상을 다른 행에 복사하려고합니다. 그녀는 Format Painter를 사용하기를 원했지만 표 셀에 사용 된 채우기 색상이 아닌 텍스트 서식 만 복사합니다. 에이프릴은 한 행에서 다른 행으로 채우기 색상을 복사하는 방법이 있는지 궁금합니다.

이 문제에 접근 할 수있는 몇 가지 방법이 있습니다. 하나는 Word에서 사용할 수있는 도구를 사용하는 것입니다. 다음 단계를 따르십시오.

  1. 원하는 색상으로 이미 채워진 행을 선택하십시오.

  2. 테이블 및 테두리 도구 모음을 표시합니다 (보기 | 도구 모음 | 테이블 및 테두리 클릭).

  3. 도구 모음에서 음영 색상 도구 오른쪽에있는 아래쪽 화살표를 클릭합니다. (이 도구는 페인트 통처럼 보입니다.) Word는 색상 팔레트를 표시합니다.

  4. 기타 채우기 색상을 클릭합니다. Word는 색 대화 상자를 표시합니다. (그림 1 참조) 선택한 행의 색상이 대화 상자에 이미 표시되어 있어야합니다.

  5. 확인을 클릭하십시오. (대화 상자에서 변경 한 사항이 없으며 확인을 클릭했습니다.)

  6. 배경색을 변경할 테이블의 다른 행을 선택하십시오.

  7. 표 및 테두리 도구 모음에서 음영 색상 도구를 클릭합니다.

원하는 색상이 선택한 행에 적용됩니다.

원하는 색상을 적용한 후 다른 테이블이나 놓친 일부 셀에 적용하려면 셀을 선택하고 F4를 누르기 만하면됩니다. 선택한 셀에서 음영이 반복됩니다.

여러 테이블 또는 여러 문서에서이 작업을 수행해야하는 경우 매크로를 사용하여 음영 처리를 수행하는 것이 좋습니다. 편리한 작은 매크로는 다음과 같습니다.

Sub ShadeTable()

Dim backColor As Long     Dim foreColor As Long

If Selection.Information(wdWithInTable) Then         With Selection.Tables(1)

backColor = .Cell(1, 1).Shading.BackgroundPatternColor             foreColor = .Cell(1, 1).Shading.ForegroundPatternColor             .Shading.BackgroundPatternColor = backColor             .Shading.ForegroundPatternColor = foreColor         End With     Else         MsgBox "Put the insertion point in a table"

End If End Sub

매크로는 테이블 첫 번째 행의 첫 번째 셀에 사용 된 음영을 기반으로 전체 테이블을 음영 처리합니다. 실행하기 전에 테이블 내 어딘가에 삽입 포인터를 배치하기 만하면됩니다.

이 매크로는 다음 웹 사이트에 언급 된 매크로의 변형입니다.

http://www.wordbanter.com/showthread.php?t=84194

_ 참고 : _

이 페이지 (또는 WordTips 사이트의 다른 페이지)에 설명 된 매크로를 사용하는 방법을 알고 싶다면 유용한 정보가 포함 된 특별 페이지를 준비했습니다.

link : / wordribbon-WordTipsMacros [새 브라우저 탭에서 특별 페이지를 열려면 여기를 클릭하세요].

_WordTips_는 비용 효율적인 Microsoft Word 교육을위한 소스입니다.

(Microsoft Word는 세계에서 가장 널리 사용되는 워드 프로세싱 소프트웨어입니다.)이 팁 (10931)은 Microsoft Word 97, 2000, 2002 및 2003에 적용됩니다. Word의 리본 인터페이스에 대한이 팁 버전 (Word 2007)을 찾을 수 있습니다. 이후) 여기 :

link : / wordribbon-Copying_Fill_Color_in_a_Table [표에 채우기 색상 복사].