VBA 宏代码：删除 Excel 工作表并显示结果

该代码是一个 VBA 宏，用于删除 Excel 工作簿中指定的工作表，并返回删除结果。具体实现过程如下：

定义变量：定义了两个字符串变量 'strDelName' 和 'strErrName'，用于记录已删除的工作表和不存在的工作表名称。
关闭警告：使用 'Application.DisplayAlerts = False' 代码关闭警告。
定义数组：定义了一个名为 'aData' 的数组，其中包含要删除的工作表名称列表。
循环删除：使用 'For Each' 循环遍历 'aData' 数组中的每个工作表名称，然后使用 'Worksheets(strName).Delete' 代码删除该工作表。如果删除成功，将工作表名称添加到 'strDelName' 字符串中，否则添加到 'strErrName' 字符串中。
恢复警告：使用 'Application.DisplayAlerts = True' 代码恢复警告。
显示结果：使用 'MsgBox' 函数显示“已删除”和“不存在”的工作表列表。

总之，该代码是一个简单的 Excel VBA 宏，用于删除 Excel 工作簿中的指定工作表。