On 8 Jan, 14:07, "Bob Phillips" <bob....@somewhere.com> wrote:
> In the VBIDE, Tools>References, and scroll down to Microsoft Scripting
> Runtime, and check that box.
>
> --
> ---
> HTH
>
> Bob
>
> (there's no email, no snail mail, but somewhere should be gmail in my addy)
>
> "signon77" <signo...@yahoo.com> wrote in message
>
> news:096f9138-46c7-47db-84c6-(E-Mail Removed)...
> On Jan 8, 1:45 pm, "Bob Phillips" <bob....@somewhere.com> wrote:
>
>
>
>
>
> > Works fine for me.
>
> > I presume you have set a reference, and this is all in a standard code
> > module?
>
> > --
> > ---
> > HTH
>
> > Bob
>
> > (there's no email, no snail mail, but somewhere should be gmail in my
> > addy)
>
> > "signon77" <signo...@yahoo.com> wrote in message
>
> >news:b105ebf3-9dec-4356-a1cf-(E-Mail Removed)...
>
> > > Hello all,
>
> > > In one function I am doing the following:
>
> > > Dim dictMenuOptions As Dictionary
> > > Set dictMenuOptions = New Dictionary
> > > dictMenuOptions.Add "EDIT", "BtnEdit_Click"
> > > dictMenuOptions.Add "COPY", "BtnCopy_Click"
> > > dictMenuOptions.Add "DELETE", "BtnDelete_Click"
> > > dictMenuOptions.Add "PKG EDIT",
> > > "BtnPackageEditor_Click"
> > > dictMenuOptions.Add "OFFICIAL",
> > > "BtnOfficial_Click"
>
> > > Call RightClick_BlotterMenu(dictMenuOptions)
>
> > > The first line of "RightClick_BlotterMenu" is defined as :
>
> > > Sub RightClick_BlotterMenu(MenuOptionsDictionary As
> > > Dictionary)
>
> > > Does anyone know why I am getting a "ByRef argument type mismatch" ?-
> > > Hide quoted text -
>
> > - Show quoted text -
>
> Hi Bob
>
> When *you say "set a reference" what does that mean?
>
> Rob- Hide quoted text -
>
> - Show quoted text -
Hi Bob,
Microsoft Scripting Runtime was already referred to by the
application.
On the face of it this code should work. I've even rebooted my machine
but still have precisely the same error.
Strangely it even occurs when I change the object from a dictionary
object to a collection.
Rob
|