龙城编程网龙城编程网

欢迎光临
我们一直在努力

用VBA编程如何遍历EXCEL每一个工作表?

VBA中遍历我们可以使用For Each 或者For循环

Sub 遍历工作表()

Dim sht As Worksheet

For Each sht In ThisWorkbook.Worksheets

maxrow = Sheets("目录").Cells(Rows.Count, 1).End(3).Row + 1

Cells(maxrow, 1).Value = sht.Name

Next

End Sub

用VBA编程如何遍历EXCEL每一个工作表?(图1)

用VBA编程如何遍历EXCEL每一个工作表?(图2)

未经允许不得转载:龙城编程网 » 用VBA编程如何遍历EXCEL每一个工作表?
分享到: 更多 (0)

联系我们