☰

내용이 아닌 마스터 시트의 배경색을 워크시트로 복사합니다.

tag-icon • tag-icon microsoft-excel
내용이 아닌 마스터 시트의 배경색을 워크시트로 복사합니다.

누구든지 도움을 줄 수 있는지 궁금합니다. 저는 탁월함에 있어서는 멍청한 놈입니다. 데이터 센터 관리 및 하드웨어 추적에 사용할 스프레드시트를 만들어야 하므로 마스터 워크시트와 랙당 시트가 생성되었습니다. 마스터 시트의 셀이 다음과 같이 채워지면 달성해야 합니다. 배경색(회색)은 해당 워크시트의 색상을 변경합니다. 그게 얼마나 의미가 있는지 잘 모르겠습니다 :)

마스터 B2:B25를 워크시트 1 B4:B27.. 마스터 D2:D25에서 워크시트 2 B4:B27.. 마스터 E2:E25를 워크시트 3 B4:B27..etc로

복사는 원하지 않는 셀의 내용을 복사하고 배경색만 복사하기 때문에 사용할 수 없습니다.

답변1

VBA에는색상변경 이벤트완전 자동으로 만들기 위해 캡처할 수 있습니다.

나는 그것을 만들기로 결정더블클릭 시. 셀을 두 번 클릭하면 색상이 다른 워크시트의 해당 셀에 복사됩니다.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim wkb As Workbook
    Set wkb = ThisWorkbook
    total_sheets = wkb.Worksheets.Count
    aff_row = Target.Row
    aff_column = Target.Column
    sheet_used = (aff_column / 2) + 2
    If aff_column > 1 Then
        If Int(sheet_used) = sheet_used Then
            If sheet_used <= total_sheets Then
                wkb.Sheets(sheet_used).Cells(aff_row + 2, 2).Interior.Color = Target.Interior.Color
            End If
        End If
    End If
End Sub

매크로 열기/VBA 왼쪽 열을 두 번 클릭합니다.시트2, 오른쪽에 코드를 붙여넣으세요.

셀 색상을 변경할 때 해당 셀을 두 번 클릭하면 다음과 같이 변경됩니다.

시트2 열B -> 시트3 열B

시트2 열D -> 시트4 열B

시트2 열F -> 시트5 열B

항상 원래 행보다 2행 아래에 있습니다.

답변2

당신이 자신을 멍청한 놈이라고 부르면, 나는 당신이 올바른 길을 따라 시작하도록 해줄 것입니다...

  1. 원래 스타일로 셀 복사: Ctrl+c

  2. 대상 셀을 선택하고 선택하여 붙여넣기: Alt+ e+ s+v

  3. 복사한 셀의 형식만 붙여넣는 형식 선택 옵션: t+Enter

답변3

모든 워크시트를 선택하면(Shift 키를 누른 채 모든 탭을 클릭) 동시에 모든 워크시트의 서식을 지정할 수 있습니다. 원본 시트에 대한 모든 변경 사항은 나머지 부분에도 반영됩니다. 그러나 이는 시트의 초기 설정에 대해서만 이야기하는 경우에만 의미가 있습니다.

이와 같은 변경이 통합 문서의 전체 수명 동안 보다 정기적으로 자동으로 발생하도록 하려면 VBA를 통해서만 이 문제를 해결할 수 있습니다(응용 프로그램을 위한 Visual Basic, 대부분의 최신 버전의 Office에 표준으로 포함되어 있습니다). 이 경우 Worksheet_Change() 이벤트에 대해 일부 코드를 추가해야 합니다.

  1. 현재 선택 항목의 배경색을 기억합니다.

    Dim myColor As Integer myColor = Selection.Interior.ColorIndex

  2. 색상을 적용할 새 영역을 선택합니다. 그러면 표시되는 모든 워크시트에서 현재 범위가 선택됩니다.

    Worksheets.Select

  3. 새 선택 항목에 원래 배경색 적용

    Selection.Interior.ColorIndex = myColor

  4. 원래 작업 중이던 탭만 다시 선택하세요. (마스터 탭이 첫 번째 시트라고 가정합니다)

    Worksheets(1).Select

참고:수정하지 않고 이 코드는 셀이 변경될 때마다 모든 시트의 모든 색상 변경을 다른 모든 시트로 미러링합니다. 이는 과잉입니다. 필요에 따라 솔루션을 훨씬 더 효율적으로 만들 수 있습니다.

관련 정보