vba如何遍历sheetname

在 VBA 中，可以使用 `For Each` 循环遍历 Workbook 中的所有 Sheet，如下所示：

Dim wb As Workbook
Dim ws As Worksheet

Set wb = ThisWorkbook '或者使用 Workbooks("WorkbookName.xlsx") 指定 Workbook

For Each ws In wb.Worksheets
    ' 进行一些操作，如输出 Sheet 名称
    Debug.Print ws.Name
Next ws

上述代码首先定义了一个 Workbook 对象和一个 Worksheet 对象，然后使用 `Set` 关键字将 Workbook 对象设置为当前 Workbook，使用 `For Each` 循环遍历 Workbook 中的所有 Worksheet，并在循环体内输出每个 Sheet 的名称。