Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

[VBA EXCEL] importare html in 1 cella, Evitare limite cella

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

[VBA EXCEL] importare html in 1 cella, Evitare limite cella

Postdi ipnovel » 10/02/16 11:06

Ciao a Tutti

ho bisogno di importare in una cella il codice html di una pagina web, ho seguito i seguenti consigli nel forum

viewtopic.php?t=87115

viewtopic.php?p=475557#p475585

funziona tutto alla perfezione :) grazie mille Anthony47

unico problema IL LIMITE della cella di excel fissata a 32767 che tronca il codice prima del punto che mi interessa :cry:

come posso dire al vba di iniziare la registrazione dopo magari 10000 caratteri?

grazie mille
Paolo
ipnovel
Newbie
 
Post: 3
Iscritto il: 10/02/16 10:55

Sponsor
 

Re: [VBA EXCEL] importare html in 1 cella, Evitare limite ce

Postdi Anthony47 » 12/02/16 00:12

Ciao ipnovel, benvenuto nel forum.
Nella prima discussione linkata si indica questa istruzione per copiare il codice in una cella:
Range("K1").Value = objIE.document.body.innerHTML

Nel tuo caso potrai usare
Codice: Seleziona tutto
Range("K1").Value = Right(objIE.document.body.innerHTML, 32000)


In questo modo caricherai "gli ultimi" 32000 caratteri.

Ti avverto che la funzione Sub Naviga(DestUrl) non e' idonea per sincronizzarsi con siti che usano script per la composizione della pagina; ti raccomando quindi di aggiungere questo codice subito prima della sua "End Sub:
Codice: Seleziona tutto
Do While objIE.readyState <> 4: DoEvents: Loop

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13885
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: [VBA EXCEL] importare html in 1 cella, Evitare limite ce

Postdi ipnovel » 12/02/16 10:44

Fantastico !! :) :)
era proprio quello che cercavo :D :D

Grazie mille
Ipnovel
ipnovel
Newbie
 
Post: 3
Iscritto il: 10/02/16 10:55

Re: [VBA EXCEL] importare html in 1 cella, Evitare limite ce

Postdi ipnovel » 13/02/16 04:57

nel caso qualcuno fosse interessato ho implementato la cosa con la seguente stringa

Codice: Seleziona tutto
Range("D6").Value = Mid(objIE.document.body.innerHTML, InStr(1, objIE.document.body.innerHTML, "xxx", vbTextCompare))


sostituendo xxx con un testo presente nella pagina html, la cattura del codice html inizia dalla parola trovata, in questo modo si centra l'obbiettivo ;)

ciao
Ipnovel
ipnovel
Newbie
 
Post: 3
Iscritto il: 10/02/16 10:55


Torna a Applicazioni Office Windows


Topic correlati a "[VBA EXCEL] importare html in 1 cella, Evitare limite cella":


Chi c’è in linea

Visitano il forum: Nessuno e 11 ospiti