Mause orta top döndükçe boş kayıt girmesi.

Merhaba ,

Bu uygulamayı daha önce sorunsuz bir şekilde kullanıyordum. Yalnız 64 bit Office sistemlerinde bildiğim kadarı ile PtrSafe deklarasyonunu yapmak zorundayız. Bu işlemi yaptıktan sonra bu uygulamayı kullanırken hata alıyorum.

            LoaderVTable.QueryInterface = MouseHookAddr

            Call CastToObject(MouseHookLoader, VarPtr(VarPtr(LoaderVTable)), SIZEOF_PTR32)

            If Not TypeOf MouseHookLoader Is VBA.Collection Then

                Set NewMouseHook = (MouseHookLoader)

                Set MouseHookLoader = Nothing

            End If

Bu kod kısmında Tip Uyuşmazlığı. Bu konu hakkında yardımcı olur musunuz ?