Возвращает массив выбранных элементов в главном листе.
| Visual Basic |
|---|
Public Function GetActiveListItems() As Variant |
| VB Script (Visual Basic) | Скопировать код |
|---|---|
varArray = ThisApplication.Shell.GetActiveListItems iCount = Ubound(varArray) For i = 0 To iCount Set Object = varArray(i) If Not Object Is Nothing Then MsgBox Object.Description End If next | |