Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
ByRef argument type mismatch when passing dictionary object
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" ? |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
ByRef argument type mismatch when passing dictionary object
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" wrote in message ... 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" ? |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
ByRef argument type mismatch when passing dictionary object
ByRef is the default, you need ByVal
Sub RightClick_BlotterMenu(ByVal MenuOptionsDictionary As Dictionary) "signon77" wrote: 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" ? |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
ByRef argument type mismatch when passing dictionary object
On Jan 8, 1:45*pm, "Bob Phillips" 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" wrote in message ... 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 |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
ByRef argument type mismatch when passing dictionary object
In the VBIDE, ToolsReferences, 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" wrote in message ... On Jan 8, 1:45 pm, "Bob Phillips" 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" wrote in message ... 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 |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
ByRef argument type mismatch when passing dictionary object
On 8 Jan, 14:07, "Bob Phillips" wrote:
In the VBIDE, ToolsReferences, 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" wrote in message ... On Jan 8, 1:45 pm, "Bob Phillips" 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" wrote in message ... 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 |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
ByRef argument type mismatch when passing dictionary object
On 8 Jan, 14:07, "Bob Phillips" wrote:
In the VBIDE, ToolsReferences, 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" wrote in message ... On Jan 8, 1:45 pm, "Bob Phillips" 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" wrote in message ... 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, I've found the source of the issue. I was looking in the wrong area entirely. Thanks for your help. Rob |
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
ByRef argument type mismatch when passing dictionary object
signon77 wrote:
I've found the source of the issue. I was looking in the wrong area entirely. Thanks for your help. Rob Care to enlighten the rest of us as to the source of the issue? Thanks, Alan Beban |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
type mismatch error when passing collection byRef | Excel Programming | |||
HELP "ByRef Argument Type Mismatch" | Excel Programming | |||
passing range to function: type of argument is byref incompatible | Excel Programming | |||
"ByRef argument type mismatch" Error | Excel Programming | |||
ByRef argument type mismatch error? | Excel Programming |