VBA UserForm MouseScroll_DEMO.xlsm won't work-> identifier expected

[wrsmcode]

Hello Cristian,

as i tried to test this workbook today, i've get this error message: "identifier expected"

Error was stopped by the modul MouseScroll at position:

` #End If

End If

If VBA7 = 0 Then

private Enum LongPtr   <--- here is the error
    [_]
End Enum

End If`

if i change the enum name to vbLongPtr, i get the message: unexpected error 35010

i can't find the error...

mfg wrsm

[cristianbuse]

Hi @wrsmcode ,

This should not happen and it's probably because of a bug in the VBA compiler on certain versions. Try removing/deleting the entire Enum definition:

#If VBA7 = 0 Then
private Enum LongPtr
[_]
End Enum
#End If

and it should work.

[wrsmcode]

Hello, sry for the late feedback... - i've found my error... i've rebooted my Laptop and your WB is now still working fine... -thanks a lot for it. issue can be closed... have a nice christmas time! mfg Joko

[cristianbuse]

Thanks @wrsmcode ,

Hope you had a nice Christimas time as well!