extraer datos web desde VBA Excel
Publicado por Luis (5 intervenciones) el 06/05/2020 04:45:17
Hola
Quisiera extraer información desde una pagina web, ya tengo código para extraer el mes actual. sin embargo necesito traer información de de otros meses y no se como enviar esos parámetros a mi consulta.
Agradezco anticipadamente el apoyo que me brinden
Quisiera extraer información desde una pagina web, ya tengo código para extraer el mes actual. sin embargo necesito traer información de de otros meses y no se como enviar esos parámetros a mi consulta.
Agradezco anticipadamente el apoyo que me brinden
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Sub Actualiza_Comision()
Dim hj As Worksheet
Dim utablas As QueryTable
Dim url As String
url = "http://www.sbs.gob.pe/app/spp/empleadores/comisiones_spp/Paginas/comision_prima.aspx"
Set hj = Worksheets.Add
hj.Name = "prueba"
Set utablas = hj.QueryTables.Add(Connection:="url;" & url, Destination:=Range("a1"))
With utablas
.Name = "Consultas"
.RefreshOnFileOpen = True
.BackgroundQuery = False
.WebFormatting = xlWebFormattingNone
.WebSelectionType = xlSpecifiedTables
.WebTables = 3
.RefreshEnd With
End Sub
Valora esta pregunta
0
