방법: 통합 문서에서 일정 범위에 스타일 적용

업데이트: 2008년 7월

통합 문서의 영역에 명명된 스타일을 적용할 수 있습니다. Excel에는 미리 정의된 여러 가지 스타일이 있습니다.

셀 서식 대화 상자에는 셀 서식을 지정할 때 사용할 수 있는 모든 옵션이 표시되며, 이러한 각각의 옵션은 코드에서도 사용할 수 있습니다. Excel에서 이 대화 상자를 표시하려면 서식 메뉴에서 셀을 클릭합니다.

문서 수준 사용자 지정의 명명된 범위에 스타일을 적용하려면

1. 새 스타일을 만들고 속성을 설정합니다. 이 코드는 ThisWorkbook 클래스가 아닌 시트 클래스에 배치해야 합니다.

   Dim style As Excel.Style = Globals.ThisWorkbook.Styles.Add("NewStyle")
   
   style.Font.Name = "Verdana"
   style.Font.Size = 12
   style.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red)
   style.Interior.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Gray)
   style.Interior.Pattern = Excel.XlPattern.xlPatternSolid
   

   Excel.Style style = Globals.ThisWorkbook.Styles.Add("NewStyle", missing);
   
   style.Font.Name = "Verdana";
   style.Font.Size = 12;
   style.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red);
   style.Interior.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Gray);
   style.Interior.Pattern = Excel.XlPattern.xlPatternSolid;
   

2. NamedRange 컨트롤을 만들고 텍스트를 할당한 다음 새 스타일을 적용합니다. 이 코드는 ThisWorkbook 클래스가 아닌 시트 클래스에 배치해야 합니다.

   Dim rangeStyles As Microsoft.Office.Tools.Excel.NamedRange = _
       Me.Controls.AddNamedRange(Me.Range("A1"), "rangeStyles")
   
   rangeStyles.Value2 = "'Style Test"
   rangeStyles.Style = "NewStyle"
   rangeStyles.Columns.AutoFit()
   

   Microsoft.Office.Tools.Excel.NamedRange rangeStyles =
       this.Controls.AddNamedRange(this.Range["A1", missing], "rangeStyles");
   
   rangeStyles.Value2 = "'Style Test";
   rangeStyles.Style = "NewStyle";
   rangeStyles.Columns.AutoFit();
   

응용 프로그램 수준 추가 기능의 명명된 범위에 스타일을 적용하려면

1. 새 스타일을 만들고 속성을 설정합니다.

   Dim style As Excel.Style = Me.Application.ActiveWorkbook.Styles.Add("NewStyle")
   
   style.Font.Name = "Verdana"
   style.Font.Size = 12
   style.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red)
   style.Interior.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Gray)
   style.Interior.Pattern = Excel.XlPattern.xlPatternSolid
   

   Excel.Style style = this.Application.ActiveWorkbook.Styles.Add("NewStyle", missing);
   
   style.Font.Name = "Verdana";
   style.Font.Size = 12;
   style.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red);
   style.Interior.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Gray);
   style.Interior.Pattern = Excel.XlPattern.xlPatternSolid;
   

2. Microsoft.Office.Interop.Excel.Range를 만들고 텍스트를 할당한 다음 새 스타일을 적용합니다.

   Dim rangeStyles As Excel.Range = Me.Application.Range("A1")
   
   rangeStyles.Value2 = "'Style Test"
   rangeStyles.Style = "NewStyle"
   rangeStyles.Columns.AutoFit()
   

   Excel.Range rangeStyles = this.Application.get_Range("A1", missing);
   
   rangeStyles.Value2 = "'Style Test";
   rangeStyles.Style = "NewStyle";
   rangeStyles.Columns.AutoFit();
   

참고 항목

작업

방법: 통합 문서에서 일정 범위의 스타일 지우기

개념

범위 작업

NamedRange 컨트롤

Visual Studio Tools for Office 프로젝트의 개체에 전역 액세스

Office 솔루션의 선택적 매개 변수 이해

변경 기록