Colección de citas famosas - Colección de máximas - La siguiente información explica cómo usar VBA para obtener el siguiente botón en la página web.

La siguiente información explica cómo usar VBA para obtener el siguiente botón en la página web.

Al combinar VBA (Visual Basic para Aplicaciones) con objetos de Internet Explorer (IE), puede obtener el siguiente botón de la página web. A continuación se explica cómo obtener el botón siguiente de un fragmento HTML determinado usando VBA:

Primero, asegúrese de tener instalada la referencia de Microsoft Internet Controls. En el Editor VBA, haga clic en Herramientas > Referencias y seleccione Controles de Internet de Microsoft.

Luego, inserte el siguiente código en el módulo de código:

Opción explícita

Sub GetNextPageButton()

Atenuar IE como InternetExplorer

Marcar HTMLdoc como HTMLDocument

Atenuar nextPageButton como HTMLAnchorElement

Crear una instancia de Internet Explorer

Establecer IE = nuevo InternetExplorer

Ingrese la URL de la página web que desea rastrear.

Eso es. Explorar""

Espera a que se cargue la página.

Hazlo sobre la marcha. Ocupado o IE. ReadyState & lt& gtReadyState_Complete

Múltiples actividades

Anillo

Obtener el contenido HTML de la página web

Establecer HTMLdoc = IE. Archivo

Botón Buscar siguiente

establecer botón de página siguiente = selector de consulta html(" a . cambiar página[página = ' 2 ']")

Muestra el texto del siguiente botón.

Si no es nextPageButton, no es nada

MsgBox "Siguiente botón:" & nextPageButton.innerText

Otro

MsgBox" Botón Siguiente no encontrado"

Terminará si...

Cierra la instancia de Internet Explorer.

Eso es. Renunciar

Establecer IE = Ninguno

Conector final

Modifique la URL de la página web en el código y reemplácela con la URL real que desea rastrear .

Ejecute el código y obtendrá el siguiente botón y mostrará un cuadro de mensaje que contiene el texto del botón.

Nota: Dado que VBA para Internet Explorer está desactualizado y es posible que no funcione correctamente en algunos casos, puede considerar el uso de tecnologías de rastreo web más modernas, como BeautifulSoup de Python o la biblioteca Selenium.