Hi there
The below code works fone
but i need to put the Addin in the same Directory
of Office11 i.e. Excel Directory, otherwise the addin cannot be loaded
What i need is a code to get my addin from any location in my PC an
then load it................propably search function help, but dono
know how to use it here........
Code
-------------------
Sub InstAddin()
Dim p As String
p = Application.Path & "\EasyFilter.XLA"
AddIns.Add Filename:=p
'*Check if Addin is Installed or not:
With Application.AddIns("EasyFilter.XLA")
If .Installed = False Then _
.Installed = True
End With
End Su
-------------------
--
helmekk
-----------------------------------------------------------------------
helmekki's Profile:
http://www.excelforum.com/member.php...nfo&userid=693
View this thread:
http://www.excelforum.com/showthread.php?threadid=47579