Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Prueba con esto, colocas este codigo de tu Formulario MDI. Private Sub mnuAbierto_Click() For Each i In Forms If i.Name = "Form2" Then 'Nombre del Formulario a Buscar MsgBox "Abierto el Formulario " & i.Name, vbInformation End If Next End Sub