如何用vba获取excel工作簿中当前选中的是哪几个工作表?

如下图所示

在工作簿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
       

发表评论