vba 生成excel

以下是使用VBA生成Excel的示例代码：

Sub GenerateExcel()
    Dim wb As Workbook
    Dim ws As Worksheet
    
    ' 创建新的工作簿
    Set wb = Workbooks.Add
    
    ' 获取第一个工作表
    Set ws = wb.Sheets(1)
    
    ' 在单元格A1中写入数据
    ws.Range("A1").Value = "Hello, World!"
    
    ' 保存工作簿
    wb.SaveAs "C:\path\to\save\file.xlsx"
    
    ' 关闭工作簿
    wb.Close
    
    ' 释放对象
    Set ws = Nothing
    Set wb = Nothing
End Sub

这段代码会创建一个新的Excel工作簿，并在第一个工作表的A1单元格中写入"Hello, World!"，然后将工作簿保存到指定路径，并关闭工作簿。