各位大侠，有一个关于Word的VBA函数小弟无法实现，请各位大侠出手！定当重谢

Question

Sub CanvertScreenPointToDocPosition( _ 
            ByVal iapp As Word.Application, _   'Word Application
            ByVal idoc As Word.Document, _      'Word ActiveDocument
            ByVal iScreenPointX As Integer, _   '屏幕的X方向坐标，单位像素
            ByVal iScreenPointY As Integer, _   '屏幕的Y方向坐标，单位像素
            ByRef oPageNum As Integer, _        '返回的像素所在的页码
            ByRef oDocPositionX As Integer, _   '返回的像素所在页码到纸张左边界的距离，单位mm 
            ByRef oDocPositionY As Integer)     '返回的像素所在页码到纸张上边界的距离，单位mm
老板想要我的命，请各位大侠救命！[email protected]