Visual Basic para Aplicaciones - Cerrar form al sacar el raton de encima del form

Hola foro, buenas de nuevo.
Una ayuda por favor. que no consigo sacar resultado.
Tengo dos form. En el form1, al pasar el raton por encima de un label se me abre el segundo form. Funciona bien!!

Ahora quiero que en este segundo form al sacar el raton de encima se cierre.

He conseguido algo parecido pero no funciona del todo bien. En este form2 hay dos labels, y al pasar el raton por encima de cualquier label se me cierra el form.

Codigo que pongo en el label del form1:
Private Sub lb_archivo_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
frm_archivo.Show
End Sub

Codigo que pongo en el form2:
Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
With frm_archivo
If X <= 1 Or Y <= 1 Or X >= (.Width * 0.875) - 1 Or Y >= (.Height * 0.875) - 1 _
Then Unload Me _
Else
End With
End Sub

Algun ayuda/sugerencia.

GRACIAS!!!!

Buenas fjpg

Te dejo un ejemplo de como hacerlo, cabe mencionar que si el cursor del mouse pasa muy rapido la macro no se activa y no cierra el userform.



Espero te sirva.

Saludos

• fjpg.zip(14,4 KB)

A veces falla, pero cuando funciona es lo que queria.
Lastima que no sea 100% fiable.

GRACIAS MIGUEL, como siempre!!!