如下图所示

在工作簿1中选中了4个工作表。
如果要用vba判断选中的是哪些工作表,可以使用Window对象的SelectedSheets属性。
代码如下:
Sub QQ1722187970()
Dim oWK As Worksheet
'遍历当前选中的所有工作表
For Each oWK In Excel.ThisWorkbook.Windows(1).SelectedSheets
Debug.Print oWK.Name
Next
End Sub


发表评论