通过excel vba保存.xlsx文件，不打开保存的文件

Sub SaveExcelFile()
    Dim filePath As String
    Dim fileName As String
    
    ' 设置保存路径和文件名
    filePath = "C:\path\to\save"
    fileName = "example.xlsx"
    
    ' 创建新的工作簿
    Dim wb As Workbook
    Set wb = Workbooks.Add
    
    ' 在工作簿中进行数据操作
    ' ...
    
    ' 保存工作簿为.xlsx文件格式
    wb.SaveAs filePath & "\" & fileName, FileFormat:=xlOpenXMLWorkbook
    
    ' 关闭工作簿
    wb.Close SaveChanges:=False
End Sub