Loading Addin with VBA

[Carlg]

I have written code to unload Addin "Test". Then I do a filecopy to
the addin default folder. That works well. I then do:

AddIns.Add("c:\defaultPath\test.ppa").Loaded = True

This errors out with a runtime error '2147188160 (80048240):
Addins (unknown Number): Invalid request. Named Addin not found.

I go into debug mode and can step through it without error. If I have
another addin loaded and just do a i = addins.count right before the
loaded = true line it does not error out.

Any thoughts what is wrong or how to work around this?

PPT 2003 SP2


Carl

 

[Steve Rindsberg]

Odd indeed

Sometimes PPT holds files open longer than it should. As a test, what happens
if you run your code up to the point where the addin is unloaded, then quit and
restart PPT manually, then run the remainder of the code?

Obviously, this isn't a real-world solution; it's just a test.

I'd also do:

if len(dir$("c:\defaultPath\test.ppa")) > 0 then
AddIns.Add("c:\defaultPath\test.ppa").Loaded = True
else
MsgBox("The file is missing")
end if

 

[Carlg]

Steve,

Thanks for your response. The count line did not work all the time.
I have entered the lines you suggested and so far it has not given
another error? I did not mention the original file is stored on a
server and copied to C:\... so that is at least part of the delay. Is
there a way to pause code to allow loading? Or preferably, is there a
way to verify the load is complete? I guess I could use "Do Until"
with fileexists = false on the file. I have a similar problem with
deleting an addin then replacing it by copying the new revised addin
to the same location. I have not found a way to verify the delete is
complete before starting the copy.

 

[Steve Rindsberg]

Steve,

Thanks for your response. The count line did not work all the time.
I have entered the lines you suggested and so far it has not given
another error? I did not mention the original file is stored on a
server and copied to C:\... so that is at least part of the delay.

Good point. The copy operation might not be complete when the .Load line tries to
execute.

Is
there a way to pause code to allow loading?

Try this:
Put your macro to Sleep
http://www.pptfaq.com/FAQ00466.htm

Or preferably, is there a
way to verify the load is complete? I guess I could use "Do Until"
with fileexists = false on the file. I have a similar problem with
deleting an addin then replacing it by copying the new revised addin
to the same location. I have not found a way to verify the delete is
complete before starting the copy.

The same sleep code followed by a test for the file's existence should do it,
though you'd also want to trap any errors returned by Dir (ie, in case you don't
have permissions to look at that directory, etc)

 

[Carlg]

Steve,

Thanks for the link to sleep! It seems to have fixed the copy issue.
However my delete code is now giving me a permission denied error. If
I break before the delete then step through it, it works every time.
If I try the delete routine again it works every time. If I step
through the delete routine it works the first time. I just read
through a post and they mentioned Norton Antivirus as a cause for
someone else. I am not running Norton.

I have tried a fileobject.delete and the filedelete with the file
system??

Any thoughts?

Carl

 

[Steve Rindsberg]

Steve,

Thanks for the link to sleep! It seems to have fixed the copy issue.
However my delete code is now giving me a permission denied error. If
I break before the delete then step through it, it works every time.
If I try the delete routine again it works every time. If I step
through the delete routine it works the first time. I just read
through a post and they mentioned Norton Antivirus as a cause for
someone else. I am not running Norton.

As I mentioned earlier, PPT tends to hang onto files for dear life once it's opened
them. You might want to set some kind of flag in an external ini file or the registry
and have your code check that at PPT startup and if need be, delete any files then.

 

[Carlg]

Steve,

Thanks for the link to sleep! It seems to have fixed the copy issue.
However my delete code is now giving me a permission denied error. If
I break before the delete then step through it, it works every time.
If I try the delete routine again it works every time. If I step
through the delete routine it works the first time. I just read
through a post and they mentioned Norton Antivirus as a cause for
someone else. I am not running Norton.

As I mentioned earlier, PPT tends to hang onto files for dear life once it's opened
them. You might want to set some kind of flag in an external ini file or the registry
and have your code check that at PPT startup and if need be, delete any files then.

I have tried a fileobject.delete and the filedelete with the file
system??

Any thoughts?

Carl

-----------------------------------------
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================

Steve,

I figured out the problem. I was not setting the file object =
nothing as I should have been. I went out and found some examples
and went duh! Thanks for your help.


Carl

 

[Steve Rindsberg]

I figured out the problem. I was not setting the file object =
nothing as I should have been. I went out and found some examples
and went duh! Thanks for your help.

Ah! Thanks for getting back with that.

I don't use FSO so I've never run into that one. Good to know.
I think I'll keep not using FSO. <g>

 

[Carlg]

Ah! Thanks for getting back with that.

I don't use FSO so I've never run into that one. Good to know.
I think I'll keep not using FSO. <g>

-----------------------------------------
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================

Steve,

Well this problem has continued to confuse me. Yesterday setting FSO
to nothing seemed to fix it, however that was not really the case. It
appears as you have mentioned PPT does not want to let go of the addin
file. Again, I believe I have solved the problem by moving the delete
step to the close event. Time will tell if this has really solved the
problem. Another option I am considering is using a batch file to
delete the file if this does not prove a solution.

Carl

 

[Steve Rindsberg]

Steve,

Well this problem has continued to confuse me. Yesterday setting FSO
to nothing seemed to fix it, however that was not really the case. It
appears as you have mentioned PPT does not want to let go of the addin
file. Again, I believe I have solved the problem by moving the delete
step to the close event. Time will tell if this has really solved the
problem. Another option I am considering is using a batch file to
delete the file if this does not prove a solution.

If you have to go that route, consider creating a small EXE instead; it could
take the name of the file to be deleted from the command line, then wait nn
seconds (using SLEEP API) and then delete the file.