Stuck! Need Help!

I have a shell document that I have written a macro for so when the document
is opened, the macro runs automatically upon opening. The last part of the
macro opens the SaveAs dialog box for the user to save the document to a new
name. After the user puts makes their directory choices and a new name, they
click save and the document does not save to the new name. The macro simply
stops and the shell document remains on the screen. To complicate this even
further, if I run this macro from the VBA IDE, it runs and saves perfectly!
Can someone please give me some help here? I feel like I've hit a brick
wall! Thank you!

Helmut
Thu May 26 12:37:26 CDT 2005

Hi Jim,

was a construction using "ontime" too complicated?
Did you try?

If you run a macro from the VBA IDE and it works
and again via automation and it doesn't, there
seems to be a timing issue.

I had a problem placing toolbars in autoopen.
No way! The toolbars didn't exist until autoopen was finished,
though I did see them.

Greetings from Bavaria, Germany

Helmut Weber, MVP
"red.sys" & chr(64) & "t-online.de"
Word XP, Win 98
http://word.mvps.org/

DodgerJim
Thu May 26 13:41:05 CDT 2005

I don't understand 'on-time.' I read what you wrote before and didn't
understand that either. I guess I need more detailed specific help with how
to do what you're suggesting. Thanks!

"Helmut Weber" wrote:

> Hi Jim,
>
> was a construction using "ontime" too complicated?
> Did you try?
>
> If you run a macro from the VBA IDE and it works
> and again via automation and it doesn't, there
> seems to be a timing issue.
>
> I had a problem placing toolbars in autoopen.
> No way! The toolbars didn't exist until autoopen was finished,
> though I did see them.
>
> Greetings from Bavaria, Germany
>
> Helmut Weber, MVP
> "red.sys" & chr(64) & "t-online.de"
> Word XP, Win 98
> http://word.mvps.org/
>
>

axeman
Thu May 26 16:01:03 CDT 2005

Try having your AutoOpen macro pointing to your actual macro that does all
the work. So you would have:

Public Sub AutoOpen()
Application.Run MacroName:="YourMacro"
End Sub

Public Sub YourMacro()

Enter your code here

End Sub

I think that's what he meant. That he had problems running a toolbar macro
that ran as an AutoOpen macro. Give it a twirl and let us know...

Axe
"Dodger Jim" wrote:

> I don't understand 'on-time.' I read what you wrote before and didn't
> understand that either. I guess I need more detailed specific help with how
> to do what you're suggesting. Thanks!
>
> "Helmut Weber" wrote:
>
> > Hi Jim,
> >
> > was a construction using "ontime" too complicated?
> > Did you try?
> >
> > If you run a macro from the VBA IDE and it works
> > and again via automation and it doesn't, there
> > seems to be a timing issue.
> >
> > I had a problem placing toolbars in autoopen.
> > No way! The toolbars didn't exist until autoopen was finished,
> > though I did see them.
> >
> > Greetings from Bavaria, Germany
> >
> > Helmut Weber, MVP
> > "red.sys" & chr(64) & "t-online.de"
> > Word XP, Win 98
> > http://word.mvps.org/
> >
> >

DodgerJim
Thu May 26 16:07:01 CDT 2005

I found the OnTime Method and learned how to use it - I think. Is my code
correct:

Application.OnTime When:=Now + "timeValue("00:00:10"), _
Name:="Memorandum.frmNewName.UserForm_Initialize"

Where I have the word 'Application' above, do I need something else?
Where do I put this code once I get it right?
Thanks!

"Helmut Weber" wrote:

> Hi Jim,
>
> was a construction using "ontime" too complicated?
> Did you try?
>
> If you run a macro from the VBA IDE and it works
> and again via automation and it doesn't, there
> seems to be a timing issue.
>
> I had a problem placing toolbars in autoopen.
> No way! The toolbars didn't exist until autoopen was finished,
> though I did see them.
>
> Greetings from Bavaria, Germany
>
> Helmut Weber, MVP
> "red.sys" & chr(64) & "t-online.de"
> Word XP, Win 98
> http://word.mvps.org/
>
>

DodgerJim
Thu May 26 16:08:02 CDT 2005

Thank you! I'll try it!

"axeman" wrote:

> Try having your AutoOpen macro pointing to your actual macro that does all
> the work. So you would have:
>
> Public Sub AutoOpen()
> Application.Run MacroName:="YourMacro"
> End Sub
>
> Public Sub YourMacro()
>
> Enter your code here
>
> End Sub
>
> I think that's what he meant. That he had problems running a toolbar macro
> that ran as an AutoOpen macro. Give it a twirl and let us know...
>
> Axe
> "Dodger Jim" wrote:
>
> > I don't understand 'on-time.' I read what you wrote before and didn't
> > understand that either. I guess I need more detailed specific help with how
> > to do what you're suggesting. Thanks!
> >
> > "Helmut Weber" wrote:
> >
> > > Hi Jim,
> > >
> > > was a construction using "ontime" too complicated?
> > > Did you try?
> > >
> > > If you run a macro from the VBA IDE and it works
> > > and again via automation and it doesn't, there
> > > seems to be a timing issue.
> > >
> > > I had a problem placing toolbars in autoopen.
> > > No way! The toolbars didn't exist until autoopen was finished,
> > > though I did see them.
> > >
> > > Greetings from Bavaria, Germany
> > >
> > > Helmut Weber, MVP
> > > "red.sys" & chr(64) & "t-online.de"
> > > Word XP, Win 98
> > > http://word.mvps.org/
> > >
> > >

DodgerJim
Thu May 26 16:31:04 CDT 2005

I still don't have something right. I have not been using an AutoOpen()
macro. I have been using the following code in the Document Code Window of
the Microsoft Word Objects, ThisDocument:

Private Sub Document_Open()
Load frmNewForm
frmNewForm.Show
End Sub

Then in the frmNewForm I start my code in the UserForm_Initialize()
subroutine.

Where do I put the AutoOpen()?

In your example, where you have 'YourMacro()', is that where I put
'UserForm_Initialize()'?

Sorry to be such a pain, but I feel like I'm floundering in the dark! Thanks!

"axeman" wrote:

> Try having your AutoOpen macro pointing to your actual macro that does all
> the work. So you would have:
>
> Public Sub AutoOpen()
> Application.Run MacroName:="YourMacro"
> End Sub
>
> Public Sub YourMacro()
>
> Enter your code here
>
> End Sub
>
> I think that's what he meant. That he had problems running a toolbar macro
> that ran as an AutoOpen macro. Give it a twirl and let us know...
>
> Axe
> "Dodger Jim" wrote:
>
> > I don't understand 'on-time.' I read what you wrote before and didn't
> > understand that either. I guess I need more detailed specific help with how
> > to do what you're suggesting. Thanks!
> >
> > "Helmut Weber" wrote:
> >
> > > Hi Jim,
> > >
> > > was a construction using "ontime" too complicated?
> > > Did you try?
> > >
> > > If you run a macro from the VBA IDE and it works
> > > and again via automation and it doesn't, there
> > > seems to be a timing issue.
> > >
> > > I had a problem placing toolbars in autoopen.
> > > No way! The toolbars didn't exist until autoopen was finished,
> > > though I did see them.
> > >
> > > Greetings from Bavaria, Germany
> > >
> > > Helmut Weber, MVP
> > > "red.sys" & chr(64) & "t-online.de"
> > > Word XP, Win 98
> > > http://word.mvps.org/
> > >
> > >

HelmutWeber
Fri May 27 02:03:02 CDT 2005

Hi Jim,

Can't test all, that doesn't work.
This one works for me:

Sub Autoopen()
' some code possible here
Application.OnTime _
When:=Now + TimeValue("00:00:05"), _
Name:="MacroAfterAutoopen"
' and nothing here to make sure,
' that autoopen has been completed before
' MacroAfterAutoopen starts
End Sub
Sub MacroAfterAutoopen()
MsgBox "MacroAfterAutoopen"
' show your userform etc...
' or start other seemably time critical code...
End Sub

This solved some problems for me, though
I can't guarantee, it will solve yours.

Greetings from Bavaria, Germany
Helmut Weber, MVP
"red.sys" & chr(64) & "t-online.de"
Word 2002, Windows 2000

DodgerJim
Fri May 27 11:15:01 CDT 2005

I tried your suggestion and it still didn't solve my problem. Thanks for
sticking with me!

"Helmut Weber" wrote:

> Hi Jim,
>
> Can't test all, that doesn't work.
> This one works for me:
>
> Sub Autoopen()
> ' some code possible here
> Application.OnTime _
> When:=Now + TimeValue("00:00:05"), _
> Name:="MacroAfterAutoopen"
> ' and nothing here to make sure,
> ' that autoopen has been completed before
> ' MacroAfterAutoopen starts
> End Sub
> Sub MacroAfterAutoopen()
> MsgBox "MacroAfterAutoopen"
> ' show your userform etc...
> ' or start other seemably time critical code...
> End Sub
>
> This solved some problems for me, though
> I can't guarantee, it will solve yours.
>
> Greetings from Bavaria, Germany
> Helmut Weber, MVP
> "red.sys" & chr(64) & "t-online.de"
> Word 2002, Windows 2000
>
>
>