Vb. NET Auto-add macros

Vb. NET automatically loads. xla files

Public Function Loadxla (ByVal xlapath as String, ByVal load As Boolean) As Boolean        Dim loaded As Boolean = False        T Ry            If (file.exists (Xlapath)) then                Dim o as Object                o = XlApp.AddIns.Add (Xlapath, True)  ' defined as Object,add by Danielinbiti                o.installed = load                loaded = o.installed            End If        Catch            loaded = False        End Try        Loadxla = Loaded    End Function

Calls such as

Loadxla ("E:\selfh.xla", True)

Xlapp as Excel.Application object

Vb. NET Auto-add macros