Will Tool Pack function travel and work with data file (.xls)?

Option Explicit
Const strAddin As String = "Analysis ToolPak"


Private Sub Workbook_Open()
With Application
   .StatusBar = ""
   .DisplayAlerts = False
End with
If Application.AddIns(strAddin).Installed = False Then
    Application.AddIns(strAddin).Installed = True
    
    If Application.AddIns(strAddin).Installed = True Then
        MsgBox "Excel Addin-'" & strAddin & "'." & Chr(13) & "Has been installed...", vbExclamation
    End If
End If
Application.DisplayAlerts = True


End Sub