Native Python Programing

아래는 Excel 워크북에서 수식 시트, 데이터 시트, 차트 시트를 생성하고 데이터를 관리하며 차트를 자동으로 생성하는 간단한 VBA 프로젝트입니다.

이 프로젝트는 다음을 포함합니다:

1. 데이터 시트에 샘플 데이터를 작성합니다.
2. 수식 시트에서 데이터를 참조하여 계산을 수행합니다.
3. 차트 시트를 생성하고 데이터 시트를 기반으로 차트를 추가합니다.

VBA 코드:

Sub CreateStructuredWorkbook()
    Dim wb As Workbook
    Dim dataSheet As Worksheet
    Dim formulaSheet As Worksheet
    Dim chartSheet As Chart
    Dim rng As Range
    Dim chartObj As ChartObject

    ' 새 워크북 생성
    Set wb = Workbooks.Add

    ' 데이터 시트 생성
    Set dataSheet = wb.Sheets.Add
    dataSheet.Name = "Data"

    ' 샘플 데이터 추가
    With dataSheet
        .Range("A1").Value = "Month"
        .Range("B1").Value = "Sales"
        .Range("A2:A7").Value = Application.Transpose(Array("January", "February", "March", "April", "May", "June"))
        .Range("B2:B7").Value = Application.Transpose(Array(1000, 1200, 1500, 1300, 1700, 1800))
    End With

    ' 수식 시트 생성
    Set formulaSheet = wb.Sheets.Add
    formulaSheet.Name = "Formulas"

    ' 데이터 참조 및 계산 수행
    With formulaSheet
        .Range("A1").Value = "Month"
        .Range("B1").Value = "Sales"
        .Range("C1").Value = "Cumulative Sales"
        .Range("A2:A7").Formula = "=Data!A2:A7"
        .Range("B2:B7").Formula = "=Data!B2:B7"
        .Range("C2").Formula = "=B2"
        .Range("C3:C7").Formula = "=C2+B3"
        .Columns("A:C").AutoFit
    End With

    ' 차트 시트 생성
    Set chartSheet = wb.Charts.Add
    chartSheet.Name = "Sales Chart"

    ' 차트 데이터 설정
    With chartSheet
        .SetSourceData Source:=dataSheet.Range("A1:B7")
        .ChartType = xlColumnClustered
        .ChartTitle.Text = "Monthly Sales"
        .Axes(xlCategory).HasTitle = True
        .Axes(xlCategory).AxisTitle.Text = "Months"
        .Axes(xlValue).HasTitle = True
        .Axes(xlValue).AxisTitle.Text = "Sales ($)"
    End With

    ' 작업 완료 메시지
    MsgBox "Workbook 구조화가 완료되었습니다!", vbInformation, "완료"
End Sub

코드 실행 방법:

1. Excel에서 Alt + F11을 눌러 VBA 편집기를 엽니다.
2. 삽입 > 모듈을 선택하여 새 모듈을 추가합니다.
3. 위의 코드를 복사하여 모듈 창에 붙여넣습니다.
4. F5를 눌러 매크로를 실행합니다.

결과:

1. Data 시트: "Month"와 "Sales" 데이터가 입력됩니다.
2. Formulas 시트: "Cumulative Sales" 계산이 포함된 시트가 생성됩니다.
3. Sales Chart 차트 시트: 데이터 시트를 기반으로 한 월별 판매 차트가 생성됩니다.

추가적인 커스터마이징이 필요하면 말씀해 주세요! 😊