Add-ins is very useful functionality in excel application. Which helps user to implement specific calculation or requirement for a specific dataset. Add-ins is nothing but a generic macro which is created to perform specific task in excel as same as excel macro. Sometimes, we need details of specific Add-ins which is being used in excel workbook. In this article, we will see how to get details of each add-ins using a excel macro.









Here is the code which will give us list and details of each add-ins in the workbook:

Sub Get_Addins_Details()
' Author: Dreams24
' Written for VBA Tricks and tips blog

Dim var_addin As AddIn
Dim i As Integer

On Error GoTo errHandlar:

ActiveWorkbook.Sheets("Sheet1").Cells(1, 1).Value = "Name"
ActiveWorkbook.Sheets("Sheet1").Cells(1, 2).Value = "Installed"
ActiveWorkbook.Sheets("Sheet1").Cells(1, 3).Value = "Is Open"
ActiveWorkbook.Sheets("Sheet1").Cells(1, 4).Value = "Path"

' Initialized value for incremental counter i
i = 1

' Loop to get each add-ins details
For Each var_addin In Excel.AddIns

    ActiveWorkbook.Sheets("Sheet1").Cells(i + 1, 1).Value = var_addin.Name
    ActiveWorkbook.Sheets("Sheet1").Cells(i + 1, 2).Value = var_addin.Installed
    ActiveWorkbook.Sheets("Sheet1").Cells(i + 1, 3).Value = var_addin.IsOpen
    ActiveWorkbook.Sheets("Sheet1").Cells(i + 1, 4).Value = var_addin.Path
    
    i = i + 1
Next var_addin

'Error handling code for runtime errors
errHandlar:
    If Err.Number > 0 Then
        MsgBox "An error has occured. See below error desciption for details." & vbNewLine & vbNewLine & "VBA Error No: " & Err.Number & vbNewLine & "VBA Error Description: " & Err.Description
    End If
    
MsgBox "Add-ins detail retreived successfully !!!", vbInformation, Title:="Add-ins List"

End Sub