Coverting 32bit VBA to 64bit

[anothercadguy]

I am having a little difficulty doing this since I am completely new on 64bit acad and system. I am trying to find out what are the right functions to call. I have a modified VBA code that I use to copy UCS from one dwg to another. This code works flawless in a 32bit but once we installed 64bit acad 2009 the code does not run. All I get is this error:

(Compile error: Function or interface marked as restricted, or the function uses an Automation type not supported in Visual Basic)

 

Here is where I get the error:

Public Function GetAcadHwnd() As Long

GetAcadHwnd = GetParent(GetParent(ThisDrawing.hwnd))

End Function

 

From what I have been re-searching the Hwnd is not the same in a 64bit system.

Any help is greatly appreciated.

thanks.