Name
Application.GetCustomListContents
Synopsis
Returns an array of items from a custom list. For example, the following code displays all of the items in each of the custom lists:
Sub TestListContent( ) Dim i As Integer, lst( ), str As String, num As Integer Debug.Print "List Number", "Contents" For i = 1 To Application.CustomListCount lst = Application.GetCustomListContents(i) str = Join(lst, ", ") num = Application.GetCustomListNum(lst) Debug.Print num, str Next End Sub
Get Programming Excel with VBA and .NET now with the O’Reilly learning platform.
O’Reilly members experience books, live events, courses curated by job role, and more from O’Reilly and nearly 200 top publishers.