sourcetip

Excel의 VBA를 사용하여 모든 시트의 채우기 색상을 "채우지 않음"으로 설정합니다.

fileupload 2023. 4. 23. 11:02
반응형

Excel의 VBA를 사용하여 모든 시트의 채우기 색상을 "채우지 않음"으로 설정합니다.

모든 시트 채우기 색상을 설정하는 방법No fillExcel에서 VBA를 사용합니다(모든 셀).모든 시트 선택과 마찬가지로 모든 셀 선택(Control+A) 후 변경fill color로.No fill.

테스트되지 않았지만 작업을 수행해야 합니다.

Sub No_Fill_Wb()

Dim ws as worksheet

For each ws in Thisworkbook.Worksheets
    ws.Cells.Interior.ColorIndex = 0
Next ws

End Sub

Excel 2016에서 코드(아래 참조)에 "0"을 사용했더니 열이 검은색으로 바뀌었습니다.

Master.Columns(Col_Start).Interior.Color = 0

단, 아래의 xlNone을 사용하는 것은 효과가 있었습니다.

Master.Columns(Col_Start).Interior.Color = xlNone 

xlNone은 BackgroundPatternColor는 동작하지 않지만 wdColorAutomatic은 동작합니다.

current Cell(전류 셀)쉐이딩.BackgroundPatternColor= wdColorAutomatic

여러분, 이것을 사용하여 "No Fill" 옵션 "This Workbook"을 선택할 수 있습니다.시트(1)내부.색상 = xlNone" 이외의 경우 배경색을 설정하려면 "ThisWorkbook"을 사용할 수 있습니다.시트(1)내부.색상 = vbgreen"

언급URL : https://stackoverflow.com/questions/40973322/set-all-sheets-fill-color-to-no-fill-using-vba-in-excel

반응형