Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Filling in for Excels missing add-in properties
Function InAddInCollection(wb) As Boolean
    For Each item In AddIns
        If item.Name = wb.Name Then
            InAddInCollection = True
        End If
    Next item
End Function