Macro extraer código html de web (límite caracteres)

[Ivan_Excel]

Buenas tardes, hace unos meses os pregunté por una macro que abriera una página web y copiara el código html en una celda.

Creo que fue Antoni que me mandó este código:

Sub HtmlTest(): On...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

.

... Casi se me olvida, la línea errónea es:

Set Tmp = iObj.NextSibling.getElementsByTagName("div")

:mrgreen: :mrgreen: :mrgreen...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[LeandroA]

Hola a mi me da error tambien pero con solo quitar NextSibling se soluciona, y la info es correcta.

Set Tmp = iObj.getElementsByTagName("div")

 

[Cacho R]

.

Hola a mi me da error tambien pero con solo quitar NextSibling se soluciona, y la info es correcta.

Set Tmp = iObj.getElementsByTagName("div")

Qué raro...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Dantte666]

Maestro chacho, requiero su ayuda xD.

 

[Dantte666]

Ultimamente, escribo super mal xD, Discupe usted Maestro Cacho

 

[Cacho R]

Maestro Cacho, requiero su ayuda xD.

Con gusto: ¿En qué tema te puedo ayudar?...

 

[Dantte666]

Disculpe la molestia estimado Cacho, ya he encontrado el problema, pretendia leer un xml, el error no radicaba en el codigo vba, sino en el mismo xml. Le agradezco, un abrazo.

 

[Macro Antonio]

Me he perdido.

 

[Cacho R]

.

Me he perdido.

¿Quieres -para tu comodidad- que te envíe la información a tu WhatsApp, Antoni?...
.

 

[Macro Antonio]

.

Me he perdido.

¿Quieres -para tu comodidad- que te envíe la información a tu WhatsApp, Antoni?...
.

Ja,ja,ja, mejor envíamela por tamtam...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

.

Ja,ja,ja, mejor envíamela por tamtam. :lol: :lol:

¡Hace varias horas que el archivo "duerme y espera" en tu correo electrónico! (Picarón: ¡Si te conoceré!)
:mrgreen: :P

 

[Macro Antonio]

.

Ja,ja,ja, mejor envíamela por tamtam. :lol: :lol:

¡Hace varias horas que el archivo "duerme y espera" en tu correo electrónico! (Picarón: ¡Si te...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

.

¡¡¡ Gracias amigo !!! Funciona correctamente :lol: :lol: :lol: :lol: :wink:

Pufffffffff... ¡Menos mal!...

 

[Macro Antonio]

.

¡¡¡ Gracias amigo !!! Funciona correctamente :lol: :lol: :lol: :lol: :wink:

Pufffffffff... ¡Menos mal!...

¡Que lindo! ¿Sufriais por mi...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Victorniquete]

Hola a todos,

En primer lugar gracias por la gran labor que hacéis, especialmente Cacho R, por ese genial macro.

Estoy intentando utilizar la primera version que enviaste y me esta dando...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Cacho R]

... el problema esta en la linea:

Set xml = CreateObject("msXML2.xmlHTTP").

He intentado varias cosas pero no soy capaz de crear el objeto en mac.

Exactamente: mac...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[bsanchez]

.

Hola a mi me da error tambien pero con solo quitar NextSibling se soluciona, y la info es correcta.

Set Tmp =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[bsanchez]

Holla Cacho R

He estado usando tu macro para compra y es la hostia, pero necesito lo mismo para alquiler!! puedes echarme una una mano!!!????

Un millón de gracias

 

[bsanchez]

... el problema esta en la linea:

Set xml = CreateObject("msXML2.xmlHTTP").

He intentado varias cosas pero no soy capaz de crear el objeto en...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí