Ver originales (Francés)

Cerrar página web en VBA Excel desde un UserForm

Resuelto
LANXADE Alain Mensajes publicados 34 Estado Miembro -  
LANXADE Alain Mensajes publicados 34 Estado Miembro -
Buenas noches,
Windows 7 - Excel 2007 -

Mediante un UserForm y un CommandButton, abro una página WEB: "Https://www.S ......." . Me gustaría cerrar esta página web con la tecla "Escape"

El código empieza así: 
Private Sub CommandButton2_Click()
ActiveWorkbook.FollowHyperlink Adresse:=""Https://www.S .......fr.htm"
End Sub

La tecla Escape debería estar incluida en el código anterior.
con por ejemplo: 
Private Sub CommandButton2_Click()
ActiveWorkbook.FollowHyperlink Adresse:=""Https://www.S .......fr.htm"
<code>If ECS = press then page web close
End If 
End Sub

Gracias de antemano por tu ayuda.

2 respuestas

  1.
    gbinforme Mensajes publicados 14930 Fecha de registro   Estado Colaborador Última intervención   4 744
     
    Hola,

    Me parece que eso será un poco más complicado de lo que imaginas.
    En efecto, tu primer comando lanza tu navegador por defecto que te mostrará tu página en una pestaña.
    Para cerrar esa pestaña, tendrías que usar APIs de Windows que pueden actuar sobre el proceso, con tal de saber identificar el proceso en cuestión y usar el método adecuado para el navegador en cuestión.
    Si abres y cierras tu página de inmediato, ¿qué interés tiene?
    Si quieres recuperar información, me parece que las peticiones web serían más adecuadas ya que las gestiona Excel.
    --
    Siempre zen
    La perfección no consiste en que no haya nada más que añadir, sino en que no haya nada que quitar. Antoine de Saint-Exupéry
    0
  2. LANXADE Alain Mensajes publicados 34 Estado Miembro
     
    Buenas noches, gbinforme,

    Gracias por tu respuesta.
    Me pondré a trabajar en la dirección solicitada con las consultas web gestionadas por Excel.

    Buenas noches y de nuevo gracias.
    0