1、通过举例认识For... ...Each循环。下面这段代码用于显示工作薄中的所有工作表对象。Sub Worksheetname()Dim ws As Worksheet僻棍募暖For Each ws In ThisWorkbook.Worksheets Debug.Print ws.NameNextEnd Sub运行程序,显示结果如下:

时间:2024-10-11 19:18:33
1、通过举例认识For... ...Each循环。下面这段代码用于显示工作薄中的所有工作表对象。Sub Worksheetname()Dim ws As Worksheet僻棍募暖For Each ws In ThisWorkbook.Worksheets Debug.Print ws.NameNextEnd Sub运行程序,显示结果如下: