Excel VBA:我切换到新工作簿并想删除工作表，但代码正在尝试删除宏工作簿中的工作表

在Excel VBA中，要切换到新工作簿并删除工作表，可以使用以下代码：

Sub DeleteWorksheet()
    Dim wb As Workbook
    Dim ws As Worksheet
    
    ' 创建新工作簿并切换到该工作簿
    Set wb = Workbooks.Add
    wb.Activate
    
    ' 删除工作表
    Application.DisplayAlerts = False ' 禁止显示删除确认对话框
    For Each ws In wb.Worksheets
        ws.Delete
    Next ws
    Application.DisplayAlerts = True ' 恢复显示删除确认对话框
End Sub

这段代码首先创建了一个新的工作簿，并将其设置为活动工作簿。然后，通过循环遍历工作簿中的所有工作表，并使用Delete方法删除每个工作表。在删除工作表之前，我们使用Application.DisplayAlerts属性将删除确认对话框设置为不显示，以避免弹出确认对话框。

这段代码的应用场景是在需要创建一个新的工作簿并删除其中的所有工作表时使用。例如，当你需要一个空白的工作簿来进行数据导入或者生成报表时，可以使用这段代码来快速创建并清空工作簿。

推荐的腾讯云相关产品是腾讯文档，它是一款基于云端的协同办公工具，可以实现多人实时协作编辑、在线存储和分享文档等功能。你可以使用腾讯文档来创建和编辑Excel文件，而无需安装任何软件。腾讯文档的产品介绍链接地址为：腾讯文档。