Problema con PupupMenu...

Hola, mi problema es el siguiente:
Utilizo este procedimiento para, cuando hago clic con el botón derecho del mouse me sepliegue un menu.
Private Sub Grid_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
PopupMenu mRep, , X, Y
End If
End Sub
El problema que tengo es que cuando hago clic sobre la grilla con el botón derecho, el menu aparece en cualquier lado del formulario y no al lado del puntero del mouse.
¿Cómo tengo que hacer?
Espero hayas entendido la pregunta.
Desde ya Gracias!