Necesito hacer lo siguiente

Irhttp: //healthapps.state.nj.us/facilities/acSetSearch.aspx? by = county

Seleccione " Hospital Especial "y"Todas las instalaciones de atención ambulatoria ** NOTA # 2"

Haga clic enBUSCA Recorre todos los hospitales de la listaHaga clic en cada hospital Obtenga algunos datos de la página del hospital

Tengo 2 problemas

No sé cómo seleccionar la " Hospital Especial "y"Todas las instalaciones de atención ambulatoria ** NOTA # 2"Cuando selecciono manualmente esos 2 tipos y luego hago clic en algunos de los hospitales, la URL no se convierte en una selección específica. Se vuelvehttp: //healthapps.state.nj.us/facilities/acFacilityList.asp después de seleccionar los 2 tipos, luego permanece así cuando hago clic en los hospitales. Por lo tanto, no puedo escribir el código que raspará esas páginas porque no sé cómo especificar la URL de cada hospital.

Me disculpo, esta tiene que ser una pregunta muy básica, pero no pude buscar en Google nada útil para Access VBA

aquí está el código que extrae los datos de una página, todavía no hice los bucles, así que esto es solo una extracción básica de los datos fuente detrás de una página

Public Function btnGetWebData_Click() 
    Dim strURL
    Dim HTML_Content As HTMLDocument
    Dim dados As Object

    'Create HTMLFile Object
    Set HTML_Content = New HTMLDocument

    'Get the WebPage Content to HTMLFile Object
    With CreateObject("msxml2.xmlhttp")
        .Open "GET", "http://healthapps.state.nj.us/facilities/acFacilityList.aspx", False
        'http://healthapps.state.nj.us/facilities/acFacilityList.aspx
        .Send
        HTML_Content.Body.innerHTML = .responseText
        Debug.Print .responseText
        Debug.Print HTML_Content.Body.innerHTML
    End With
End Function