David el Grande
 
He estado probando con la opción del Timer... pero no acaba de 'satisfacerme'.   
Código:
 Private Sub MnuRefrescar_Click()
Timer1.Enabled=true
'procedimiento de refresco 1
Timer1.enabled=true
'procedimiento de refresco 2
....
End Sub
Private Sub Timer1_Timer()
Me.PopupMenu MnuOpcion
End Sub
  El interval del Timer lo tengo a 200 milis 
Lo que pasa es que como el popup se muestra según las coordenadas del cursor... mientras mueves el cursor el popup te 'acompaña'.... 
... sigo buscando ...