我同时选中了B、C工作表;A、D工作表没有选中,如何用vba将选中的工作表放到数组中?
如图,我同时选中了B、C工作表;A、D工作表没有选中,如何用vba将选中的工作表放到数组中?
我的目的是判断工作表是否被选中,选中就放入数组里,不是简单的判断工作表名称是B、C就放入数组或将第2、3个工作表放入数组。 或者告诉我如何判断工作表被选中了也行。。。。请高手帮忙。。。。 VBA 数组 职场
[解决办法]
Dim i As Long
For i = 1 To ActiveWindow.SelectedSheets.Count
Debug.Print ActiveWindow.SelectedSheets(i).Name
Next
Dim i As Long
Dim strArr() As String
Redim strArr(1 To ActiveWindow.SelectedSheets.Count)
For i = 1 To ActiveWindow.SelectedSheets.Count
strArr(i) = ActiveWindow.SelectedSheets(i).Name
Next