VB script to expand all the folders? (O2K)

StargateFanFromWork · External Since: Aug 16, 2006 Posts: 81

Has anyone seen a script to expand all the folders upon Outlook opening?
Every time I start the computer and then open Outlook, I have to expand all
the folders manually. I've found that the system I use is the best for me
except that it requires me to do this. Was hoping to automate it. I'd
rather do one mouse click to give permission for scripts to work than to
continue expanding as if I have to reboot, I still have to go back and
expand them once again. Yet having them all as separate folders with no
nesting creates other issues that I won't go into since it's not strictly
necessary to this thread. Was hoping someone knew something that would work
or could direct me to a URL that has one.
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread

Surprised

D Thanks!

Michael Bauer [MVP - Outl · External Since: Aug 04, 2006 Posts: 594

The workaround is to make each folder once the current one. It's quite funny
and may take some time:
http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Organize eMails:
<http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>

Am Mon, 30 Jul 2007 11:15:28 -0400 schrieb StargateFanFromWork:

> Has anyone seen a script to expand all the folders upon Outlook opening?
> Every time I start the computer and then open Outlook, I have to expand
all
> the folders manually. I've found that the system I use is the best for me
> except that it requires me to do this. Was hoping to automate it. I'd
> rather do one mouse click to give permission for scripts to work than to
> continue expanding as if I have to reboot, I still have to go back and
> expand them once again. Yet having them all as separate folders with no
> nesting creates other issues that I won't go into since it's not strictly
> necessary to this thread. Was hoping someone knew something that would
work
> or could direct me to a URL that has one.
>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread
>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread
>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread
>
> Surprised

D Thanks!

StargateFanFromWork · External Since: Aug 16, 2006 Posts: 81

"Michael Bauer [MVP - Outlook]" <mb.DeleteThis@mvps.org> wrote in message
news:16ze91a9a6fot$.1jezvmrixyn4$.dlg@40tude.net...

> The workaround is to make each folder once the current one. It's quite
> funny
> and may take some time:
> http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6

Strange, I didn't find it funny. In actuality, it's amazing how I thought
that it might take something like this. I've written macros in AI (AutoIt)
for years that play our keystrokes, so this behaviour isn't unfamiliar to
me. Thanks for this, this will make life easier. On the one hand, we need
nested folders to make life easier but filing is a pane because O2K doesn't
seem to support a way to have the folders expand on startup.

But that does leave me with a question, the VB script on that page above is
this:
*********************************************************
Private Sub Application_Startup()
ExpandAllFolders
End Sub

Private Sub ExpandAllFolders()
On Error Resume Next
Dim F As Outlook.MAPIFolder
Dim Ns As Outlook.NameSpace

Set Ns = Application.GetNamespace("Mapi")

Set F = Application.ActiveExplorer.CurrentFolder

LoopFolders Ns.Folders, True
DoEvents

Set Application.ActiveExplorer.CurrentFolder = F
End Sub

Private Sub LoopFolders(Folders As Outlook.Folders, _
ByVal bRecursive As Boolean _
)
Dim F As Outlook.MAPIFolder

For Each F In Folders
Set Application.ActiveExplorer.CurrentFolder = F
DoEvents

If bRecursive Then
If F.Folders.Count Then
LoopFolders F.Folders, bRecursive
End If
End If
Next
End Sub
*********************************************************The _only_ drawback
is that it expands everything, even what's in the Public Folders.Is there a
way to limit the above to just expand what's in our own Outlook Today
section?Thanks!> -- > Viele Gruesse / Best regards> Michael Bauer - MVP
Outlook> Organize eMails:>
<http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>>
> Am Mon, 30 Jul 2007 11:15:28 -0400 schrieb StargateFanFromWork:> >> Has
anyone seen a script to expand all the folders upon Outlook opening? >>
Every time I start the computer and then open Outlook, I have to expand> all
>> the folders manually. I've found that the system I use is the best for
me >> except that it requires me to do this. Was hoping to automate it.
I'd >> rather do one mouse click to give permission for scripts to work than
to >> continue expanding as if I have to reboot, I still have to go back and
>> expand them once again. Yet having them all as separate folders with no
>> nesting creates other issues that I won't go into since it's not strictly
>> necessary to this thread. Was hoping someone knew something that would>
work >> or could direct me to a URL that has one.>>>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>>
>> Surprised

D Thanks!

StargateFanFromWork · External Since: Aug 16, 2006 Posts: 81

(That should be "pain" and not "pane", btw ...)

Is there any way to limit the macro? It's still going 5 mins later. It
took a second or two to expand my dozens of folders, but it's taking a super
forever to expand all the ones if the Public Folders which aren't mine,
even.

Thanks.

"StargateFanFromWork" <NoSpam RemoveThis @NoJunk.com> wrote in message
news:et5AS8R1HHA.5160@TK2MSFTNGP05.phx.gbl...
> "Michael Bauer [MVP - Outlook]" <mb RemoveThis @mvps.org> wrote in message
> news:16ze91a9a6fot$.1jezvmrixyn4$.dlg@40tude.net...
>
>> The workaround is to make each folder once the current one. It's quite
>> funny
>> and may take some time:
>> http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6
>
> Strange, I didn't find it funny. In actuality, it's amazing how I thought
> that it might take something like this. I've written macros in AI
> (AutoIt) for years that play our keystrokes, so this behaviour isn't
> unfamiliar to me. Thanks for this, this will make life easier. On the
> one hand, we need nested folders to make life easier but filing is a pane
> because O2K doesn't seem to support a way to have the folders expand on
> startup.
>
> But that does leave me with a question, the VB script on that page above
> is this:
> *********************************************************
> Private Sub Application_Startup()
> ExpandAllFolders
> End Sub
>
> Private Sub ExpandAllFolders()
> On Error Resume Next
> Dim F As Outlook.MAPIFolder
> Dim Ns As Outlook.NameSpace
>
> Set Ns = Application.GetNamespace("Mapi")
>
> Set F = Application.ActiveExplorer.CurrentFolder
>
> LoopFolders Ns.Folders, True
> DoEvents
>
> Set Application.ActiveExplorer.CurrentFolder = F
> End Sub
>
> Private Sub LoopFolders(Folders As Outlook.Folders, _
> ByVal bRecursive As Boolean _
> )
> Dim F As Outlook.MAPIFolder
>
> For Each F In Folders
> Set Application.ActiveExplorer.CurrentFolder = F
> DoEvents
>
> If bRecursive Then
> If F.Folders.Count Then
> LoopFolders F.Folders, bRecursive
> End If
> End If
> Next
> End Sub
> *********************************************************The _only_
> drawback is that it expands everything, even what's in the Public
> Folders.Is there a way to limit the above to just expand what's in our own
> Outlook Today section?Thanks!> -- > Viele Gruesse / Best regards> Michael
> Bauer - MVP Outlook> Organize eMails:>
> <http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>>
> > Am Mon, 30 Jul 2007 11:15:28 -0400 schrieb StargateFanFromWork:> >> Has
> anyone seen a script to expand all the folders upon Outlook opening? >>
> Every time I start the computer and then open Outlook, I have to expand>
> all
> >> the folders manually. I've found that the system I use is the best for
> me >> except that it requires me to do this. Was hoping to automate it.
> I'd >> rather do one mouse click to give permission for scripts to work
> than to >> continue expanding as if I have to reboot, I still have to go
> back and
> >> expand them once again. Yet having them all as separate folders with
> >> no nesting creates other issues that I won't go into since it's not
> >> strictly necessary to this thread. Was hoping someone knew something
> >> that would>
> work >> or could direct me to a URL that has one.>>>
> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>>
> >> Surprised

D Thanks!
>
>

StargateFanFromWork · External Since: Aug 16, 2006 Posts: 81

"StargateFanFromWork" <NoSpam RemoveThis @NoJunk.com> wrote in message
news:%23%23oUQHS1HHA.4712@TK2MSFTNGP04.phx.gbl...
> (That should be "pain" and not "pane", btw ...)
>
> Is there any way to limit the macro? It's still going 5 mins later. It

Like the Energizer Bunny, it keeps going and going ... the Public Folder
section is HUGE. It's still expanding them all this time later ... <g>

Any hope for just expanding the section that I use, under "Outlook Today"?
<g>

> took a second or two to expand my dozens of folders, but it's taking a
> super forever to expand all the ones if the Public Folders which aren't
> mine, even.
>
> Thanks.
>
> "StargateFanFromWork" <NoSpam RemoveThis @NoJunk.com> wrote in message
> news:et5AS8R1HHA.5160@TK2MSFTNGP05.phx.gbl...
>> "Michael Bauer [MVP - Outlook]" <mb RemoveThis @mvps.org> wrote in message
>> news:16ze91a9a6fot$.1jezvmrixyn4$.dlg@40tude.net...
>>
>>> The workaround is to make each folder once the current one. It's quite
>>> funny
>>> and may take some time:
>>> http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6
>>
>> Strange, I didn't find it funny. In actuality, it's amazing how I
>> thought that it might take something like this. I've written macros in
>> AI (AutoIt) for years that play our keystrokes, so this behaviour isn't
>> unfamiliar to me. Thanks for this, this will make life easier. On the
>> one hand, we need nested folders to make life easier but filing is a pane
>> because O2K doesn't seem to support a way to have the folders expand on
>> startup.
>>
>> But that does leave me with a question, the VB script on that page above
>> is this:
>> *********************************************************
>> Private Sub Application_Startup()
>> ExpandAllFolders
>> End Sub
>>
>> Private Sub ExpandAllFolders()
>> On Error Resume Next
>> Dim F As Outlook.MAPIFolder
>> Dim Ns As Outlook.NameSpace
>>
>> Set Ns = Application.GetNamespace("Mapi")
>>
>> Set F = Application.ActiveExplorer.CurrentFolder
>>
>> LoopFolders Ns.Folders, True
>> DoEvents
>>
>> Set Application.ActiveExplorer.CurrentFolder = F
>> End Sub
>>
>> Private Sub LoopFolders(Folders As Outlook.Folders, _
>> ByVal bRecursive As Boolean _
>> )
>> Dim F As Outlook.MAPIFolder
>>
>> For Each F In Folders
>> Set Application.ActiveExplorer.CurrentFolder = F
>> DoEvents
>>
>> If bRecursive Then
>> If F.Folders.Count Then
>> LoopFolders F.Folders, bRecursive
>> End If
>> End If
>> Next
>> End Sub
>> *********************************************************The _only_
>> drawback is that it expands everything, even what's in the Public
>> Folders.Is there a way to limit the above to just expand what's in our
>> own Outlook Today section?Thanks!> -- > Viele Gruesse / Best regards>
>> Michael Bauer - MVP Outlook> Organize eMails:>
>> <http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>>
>> > Am Mon, 30 Jul 2007 11:15:28 -0400 schrieb StargateFanFromWork:> >> Has
>> anyone seen a script to expand all the folders upon Outlook opening? >>
>> Every time I start the computer and then open Outlook, I have to expand>
>> all
>> >> the folders manually. I've found that the system I use is the best
>> >> for
>> me >> except that it requires me to do this. Was hoping to automate it.
>> I'd >> rather do one mouse click to give permission for scripts to work
>> than to >> continue expanding as if I have to reboot, I still have to go
>> back and
>> >> expand them once again. Yet having them all as separate folders with
>> >> no nesting creates other issues that I won't go into since it's not
>> >> strictly necessary to this thread. Was hoping someone knew something
>> >> that would>
>> work >> or could direct me to a URL that has one.>>>
>> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
>> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
>> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>>
>> >> Surprised

D Thanks!
>>
>>
>
>

Michael Bauer [MVP - Outl · External Since: Aug 04, 2006 Posts: 594

It's upated:
http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Organize eMails:
<http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>

Am Thu, 2 Aug 2007 13:19:05 -0400 schrieb StargateFanFromWork:

> "StargateFanFromWork" <NoSpam.RemoveThis@NoJunk.com> wrote in message
> news:%23%23oUQHS1HHA.4712@TK2MSFTNGP04.phx.gbl...
>> (That should be "pain" and not "pane", btw ...)
>>
>> Is there any way to limit the macro? It's still going 5 mins later. It
>
> Like the Energizer Bunny, it keeps going and going ... the Public Folder
> section is HUGE. It's still expanding them all this time later ... <g>
>
> Any hope for just expanding the section that I use, under "Outlook Today"?
> <g>
>
>> took a second or two to expand my dozens of folders, but it's taking a
>> super forever to expand all the ones if the Public Folders which aren't
>> mine, even.
>>
>> Thanks.
>>
>> "StargateFanFromWork" <NoSpam.RemoveThis@NoJunk.com> wrote in message
>> news:et5AS8R1HHA.5160@TK2MSFTNGP05.phx.gbl...
>>> "Michael Bauer [MVP - Outlook]" <mb.RemoveThis@mvps.org> wrote in message
>>> news:16ze91a9a6fot$.1jezvmrixyn4$.dlg@40tude.net...
>>>
>>>> The workaround is to make each folder once the current one. It's quite
>>>> funny
>>>> and may take some time:
>>>>
http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6
>>>
>>> Strange, I didn't find it funny. In actuality, it's amazing how I
>>> thought that it might take something like this. I've written macros in
>>> AI (AutoIt) for years that play our keystrokes, so this behaviour isn't
>>> unfamiliar to me. Thanks for this, this will make life easier. On the
>>> one hand, we need nested folders to make life easier but filing is a
pane
>>> because O2K doesn't seem to support a way to have the folders expand on
>>> startup.
>>>
>>> But that does leave me with a question, the VB script on that page above
>>> is this:
>>> *********************************************************
>>> Private Sub Application_Startup()
>>> ExpandAllFolders
>>> End Sub
>>>
>>> Private Sub ExpandAllFolders()
>>> On Error Resume Next
>>> Dim F As Outlook.MAPIFolder
>>> Dim Ns As Outlook.NameSpace
>>>
>>> Set Ns = Application.GetNamespace("Mapi")
>>>
>>> Set F = Application.ActiveExplorer.CurrentFolder
>>>
>>> LoopFolders Ns.Folders, True
>>> DoEvents
>>>
>>> Set Application.ActiveExplorer.CurrentFolder = F
>>> End Sub
>>>
>>> Private Sub LoopFolders(Folders As Outlook.Folders, _
>>> ByVal bRecursive As Boolean _
>>> )
>>> Dim F As Outlook.MAPIFolder
>>>
>>> For Each F In Folders
>>> Set Application.ActiveExplorer.CurrentFolder = F
>>> DoEvents
>>>
>>> If bRecursive Then
>>> If F.Folders.Count Then
>>> LoopFolders F.Folders, bRecursive
>>> End If
>>> End If
>>> Next
>>> End Sub
>>> *********************************************************The _only_
>>> drawback is that it expands everything, even what's in the Public
>>> Folders.Is there a way to limit the above to just expand what's in our
>>> own Outlook Today section?Thanks!> -- > Viele Gruesse / Best regards>
>>> Michael Bauer - MVP Outlook> Organize eMails:>
>>>
<http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>>
>>> > Am Mon, 30 Jul 2007 11:15:28 -0400 schrieb StargateFanFromWork:> >>
Has
>>> anyone seen a script to expand all the folders upon Outlook opening? >>
>>> Every time I start the computer and then open Outlook, I have to expand>
>>> all
>>> >> the folders manually. I've found that the system I use is the best
>>> >> for
>>> me >> except that it requires me to do this. Was hoping to automate it.
>>> I'd >> rather do one mouse click to give permission for scripts to work
>>> than to >> continue expanding as if I have to reboot, I still have to go
>>> back and
>>> >> expand them once again. Yet having them all as separate folders with
>>> >> no nesting creates other issues that I won't go into since it's not
>>> >> strictly necessary to this thread. Was hoping someone knew something
>>> >> that would>
>>> work >> or could direct me to a URL that has one.>>>
>>>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
>>>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
>>>
http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>>
>>> >> Surprised

D Thanks!
>>>
>>>
>>
>>

StargateFanFromWork · External Since: Aug 16, 2006 Posts: 81

"Michael Bauer [MVP - Outlook]" <mb.RemoveThis@mvps.org> wrote in message
news:j3x4ow05ysxa.gu6nhf89zqca.dlg@40tude.net...
>
> It's upated:
> http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6

That was incredible yesterday <g>. Oh, it took a second or so only to
expand my folders under "Outlook Today" but it kept running for about
another hour after this Energizer Bunny message I posted <g>. Now _that_
part _was_ funny, as initially predicted. I was just amazed how long it
took Outlook to go before crashing, because eventually it did <g>.

So very kewl that you updated this. That will be neat.

I did get an error though on enabling the macros on O2K startup. The error
message is this:
Ambiguous name detected: Application_Setup

While the text selected is the macro name part:
Private Sub Application_Startup selected

So I couldn't check it out to see what this neat little macro would do.
<Crossing fingers> Hope it's something easy to fix.

Cheers and thanks!!

Surprised

D

> --
> Viele Gruesse / Best regards
> Michael Bauer - MVP Outlook
> Organize eMails:
>
> <http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>
>
> Am Thu, 2 Aug 2007 13:19:05 -0400 schrieb StargateFanFromWork:
>
>> "StargateFanFromWork" <NoSpam.RemoveThis@NoJunk.com> wrote in message
>> news:%23%23oUQHS1HHA.4712@TK2MSFTNGP04.phx.gbl...
>>> (That should be "pain" and not "pane", btw ...)
>>>
>>> Is there any way to limit the macro? It's still going 5 mins later. It
>>
>> Like the Energizer Bunny, it keeps going and going ... the Public Folder
>> section is HUGE. It's still expanding them all this time later ... <g>
>>
>> Any hope for just expanding the section that I use, under "Outlook
>> Today"?
>> <g>
>>
>>> took a second or two to expand my dozens of folders, but it's taking a
>>> super forever to expand all the ones if the Public Folders which aren't
>>> mine, even.
>>>
>>> Thanks.
>>>
>>> "StargateFanFromWork" <NoSpam.RemoveThis@NoJunk.com> wrote in message
>>> news:et5AS8R1HHA.5160@TK2MSFTNGP05.phx.gbl...
>>>> "Michael Bauer [MVP - Outlook]" <mb.RemoveThis@mvps.org> wrote in message
>>>> news:16ze91a9a6fot$.1jezvmrixyn4$.dlg@40tude.net...
>>>>
>>>>> The workaround is to make each folder once the current one. It's quite
>>>>> funny
>>>>> and may take some time:
>>>>>
> http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6
>>>>
>>>> Strange, I didn't find it funny. In actuality, it's amazing how I
>>>> thought that it might take something like this. I've written macros in
>>>> AI (AutoIt) for years that play our keystrokes, so this behaviour isn't
>>>> unfamiliar to me. Thanks for this, this will make life easier. On the
>>>> one hand, we need nested folders to make life easier but filing is a
> pane
>>>> because O2K doesn't seem to support a way to have the folders expand on
>>>> startup.
>>>>
>>>> But that does leave me with a question, the VB script on that page
>>>> above
>>>> is this:
>>>> *********************************************************
>>>> Private Sub Application_Startup()
>>>> ExpandAllFolders
>>>> End Sub
>>>>
>>>> Private Sub ExpandAllFolders()
>>>> On Error Resume Next
>>>> Dim F As Outlook.MAPIFolder
>>>> Dim Ns As Outlook.NameSpace
>>>>
>>>> Set Ns = Application.GetNamespace("Mapi")
>>>>
>>>> Set F = Application.ActiveExplorer.CurrentFolder
>>>>
>>>> LoopFolders Ns.Folders, True
>>>> DoEvents
>>>>
>>>> Set Application.ActiveExplorer.CurrentFolder = F
>>>> End Sub
>>>>
>>>> Private Sub LoopFolders(Folders As Outlook.Folders, _
>>>> ByVal bRecursive As Boolean _
>>>> )
>>>> Dim F As Outlook.MAPIFolder
>>>>
>>>> For Each F In Folders
>>>> Set Application.ActiveExplorer.CurrentFolder = F
>>>> DoEvents
>>>>
>>>> If bRecursive Then
>>>> If F.Folders.Count Then
>>>> LoopFolders F.Folders, bRecursive
>>>> End If
>>>> End If
>>>> Next
>>>> End Sub
>>>> *********************************************************The _only_
>>>> drawback is that it expands everything, even what's in the Public
>>>> Folders.Is there a way to limit the above to just expand what's in our
>>>> own Outlook Today section?Thanks!> -- > Viele Gruesse / Best regards>
>>>> Michael Bauer - MVP Outlook> Organize eMails:>
>>>>
> <http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>>
>>>> > Am Mon, 30 Jul 2007 11:15:28 -0400 schrieb StargateFanFromWork:> >>
> Has
>>>> anyone seen a script to expand all the folders upon Outlook opening? >>
>>>> Every time I start the computer and then open Outlook, I have to
>>>> expand>
>>>> all
>>>> >> the folders manually. I've found that the system I use is the best
>>>> >> for
>>>> me >> except that it requires me to do this. Was hoping to automate
>>>> it.
>>>> I'd >> rather do one mouse click to give permission for scripts to work
>>>> than to >> continue expanding as if I have to reboot, I still have to
>>>> go
>>>> back and
>>>> >> expand them once again. Yet having them all as separate folders
>>>> >> with
>>>> >> no nesting creates other issues that I won't go into since it's not
>>>> >> strictly necessary to this thread. Was hoping someone knew
>>>> >> something
>>>> >> that would>
>>>> work >> or could direct me to a URL that has one.>>>
>>>>
> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
>>>>
> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>
>>>>
> http://groups.google.ca/group/microsoft.public.outlook.program_vba/bro..._thread>>
>>>> >> Surprised

D Thanks!
>>>>
>>>>
>>>
>>>

StargateFan · External Since: May 09, 2004 Posts: 123

On Fri, 3 Aug 2007 11:04:44 -0400, "StargateFanFromWork"
<NoSpam RemoveThis @NoJunk.com> wrote:

>"Michael Bauer [MVP - Outlook]" <mb RemoveThis @mvps.org> wrote in message
>news:j3x4ow05ysxa.gu6nhf89zqca.dlg@40tude.net...
>>
>> It's upated:
>> http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6
>
>That was incredible yesterday <g>. Oh, it took a second or so only to
>expand my folders under "Outlook Today" but it kept running for about
>another hour after this Energizer Bunny message I posted <g>. Now _that_
>part _was_ funny, as initially predicted. I was just amazed how long it
>took Outlook to go before crashing, because eventually it did <g>.
>
>So very kewl that you updated this. That will be neat.
>
>I did get an error though on enabling the macros on O2K startup. The error
>message is this:
>Ambiguous name detected: Application_Setup
>
>While the text selected is the macro name part:
>Private Sub Application_Startup selected
>
>So I couldn't check it out to see what this neat little macro would do.
><Crossing fingers> Hope it's something easy to fix.
>
>Cheers and thanks!!
>
> Surprised

D

Does anyone know what might be causing this "Ambiguous Name Detected"
error and how to fix it?

Thanks! Surprised

D

Michael Bauer [MVP - Outl · External Since: Aug 04, 2006 Posts: 594

The error message tells you what to do: There're two methods with the same
name and that's not allowed. So, search your code for that and rename one of
it.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Organize eMails:
<http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>

Am Sat, 04 Aug 2007 09:58:21 -0400 schrieb StargateFan:

> On Fri, 3 Aug 2007 11:04:44 -0400, "StargateFanFromWork"
> <NoSpam.TakeThisOut@NoJunk.com> wrote:
>
>>"Michael Bauer [MVP - Outlook]" <mb.TakeThisOut@mvps.org> wrote in message
>>news:j3x4ow05ysxa.gu6nhf89zqca.dlg@40tude.net...
>>>
>>> It's upated:
>>>
http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6
>>
>>That was incredible yesterday <g>. Oh, it took a second or so only to
>>expand my folders under "Outlook Today" but it kept running for about
>>another hour after this Energizer Bunny message I posted <g>. Now _that_
>>part _was_ funny, as initially predicted. I was just amazed how long it
>>took Outlook to go before crashing, because eventually it did <g>.
>>
>>So very kewl that you updated this. That will be neat.
>>
>>I did get an error though on enabling the macros on O2K startup. The
error
>>message is this:
>>Ambiguous name detected: Application_Setup
>>
>>While the text selected is the macro name part:
>>Private Sub Application_Startup selected
>>
>>So I couldn't check it out to see what this neat little macro would do.
>><Crossing fingers> Hope it's something easy to fix.
>>
>>Cheers and thanks!!
>>
>> Surprised

D
>
> Does anyone know what might be causing this "Ambiguous Name Detected"
> error and how to fix it?
>
> Thanks! Surprised

D

StargateFanFromWork · External Since: Aug 16, 2006 Posts: 81

"Michael Bauer [MVP - Outlook]" <mb.DeleteThis@mvps.org> wrote in message
news:14i57s4r24krq$.1l5coy76zp6b6.dlg@40tude.net...
>
>
> The error message tells you what to do: There're two methods with the same
> name and that's not allowed. So, search your code for that and rename one
> of
> it.

Ah, thank you for the education. Sure enough, I don't know how it happened,
maybe a slip-click or something, but I had 3 lines of code bunched up
underneath a macro so there was no separation, that had first bit of the
macro:
Private Sub Application_Startup()
ExpandAllFolders
End Sub

I double-checked all the code and everything works well now. This is
actually pretty unbelievable. All these years of using Outlook and I'll now
be able to stop the deadly dull routine of expanding all my folders. Very
kewl.

Thanks. Surprised

D

> Viele Gruesse / Best regards
> Michael Bauer - MVP Outlook
> Organize eMails:
>
> <http://www.vboffice.net/product.html?id=2006063&cmd=detail&lang=en&pub=6>
>
> Am Sat, 04 Aug 2007 09:58:21 -0400 schrieb StargateFan:
>
>> On Fri, 3 Aug 2007 11:04:44 -0400, "StargateFanFromWork"
>> <NoSpam.DeleteThis@NoJunk.com> wrote:
>>
>>>"Michael Bauer [MVP - Outlook]" <mb.DeleteThis@mvps.org> wrote in message
>>>news:j3x4ow05ysxa.gu6nhf89zqca.dlg@40tude.net...
>>>>
>>>> It's upated:
>>>>
> http://www.vboffice.net/sample.html?mnu=2&lang=en&smp=57&cmd=showitem&pub=6
>>>
>>>That was incredible yesterday <g>. Oh, it took a second or so only to
>>>expand my folders under "Outlook Today" but it kept running for about
>>>another hour after this Energizer Bunny message I posted <g>. Now _that_
>>>part _was_ funny, as initially predicted. I was just amazed how long it
>>>took Outlook to go before crashing, because eventually it did <g>.
>>>
>>>So very kewl that you updated this. That will be neat.
>>>
>>>I did get an error though on enabling the macros on O2K startup. The
> error
>>>message is this:
>>>Ambiguous name detected: Application_Setup
>>>
>>>While the text selected is the macro name part:
>>>Private Sub Application_Startup selected
>>>
>>>So I couldn't check it out to see what this neat little macro would do.
>>><Crossing fingers> Hope it's something easy to fix.
>>>
>>>Cheers and thanks!!
>>>
>>> Surprised

D
>>
>> Does anyone know what might be causing this "Ambiguous Name Detected"
>> error and how to fix it?
>>
>> Thanks! Surprised

D