The Entity object represents an entity contained in an instance of Entities Collection either in Tab or Document object.
Set FSO = CreateObject("Scripting.FileSystemObject") Set Output = FSO.CreateTextFile("c:\output.txt", True) For Each Entity in App.ActiveTab.Item(0).Entities Output.WriteLine Entity.Type & " - " & Entity.DisplayName Next