"Save as" html / parse html από Excel VBA

[DrLo]

θέλω να κάνω parse με VBA σε excel το source μιας σελίδας ... ας πούμε ΕΝΤΕΛΩΣ ΤΥΧΑΙΑ αυτό που παίρνεις όταν βαζεις στο google translate την λέξη "Strand" από Γερμανικά -> Αγγλικά

φτιάχνω ας πούμε

	Dim http As Object, html As New HTMLDocument
	    Set http = CreateObject("MSXML2.XMLHTTP")
        http.Open "GET", url, False
        http.send
        html.body.innerHTML = http.responseText
	

όπου το url είναι το κατάλληλο ur για τη δουλειά αυτή

https://translate.google.com/#view=home&op=translate&sl=de&tl=en&text=Strand

.

δε ξέρω πως να το πω σωστά (δεν είμαι "του χώρου") αλλά καταλαβαίνω ο κώδικας που παίρνω δεν είναι το "τελικό" html αλλά αυτό που "γεννά" πχ τα επιμέρους στοιχεία του

ας το πω ο κώδικας της javascript (???) που δημιουργεί τα πεδία που διαφέρουν αναλογα με το αίτημα

.

δε παίρνω δηλαδή αυτό που βλέπω στο "developer tools" του chrome όπυ βλέπω πχ ποιες παράγραφοι και ποιά class αντιστοιχούν πχ στις αγγλικές λέξεις που μεταφράζει κλπ κλπ

για να τα διαβάσω με πχ Document.getElementsByClassName() κλπ κλπ

.

Αντίθετά αν κάνω τη σελίδα "save as html" από τον chrome και την ανοιξω τοπικά μετά με τον ίδιο κώδικα όλα πάνε καλά.

.

Σκέγτηκα λοιπόν να σώζω πρώτα τη σελίδα που βγάζει το query τοπικά και να ανοίγω αυτό το αρχείο μετά

.

όμως όπως ανέμενα κάνοντας πχ τα παρακάτω

https://stackoverflow.com/questions/13193210/can-i-save-a-webpage-source-html-dynamically-using-vba-in-my-local-machine

αυτό που σώζεται είναι πάλι το ίδιο κείμενο με αυτό που άνοιγα κατευθείαν , όχι το "αποτέλεσμα".

.

δε ξέρω αν μεταφέρω σωστά αυτό που θέλωω να πω γιατί δεν ξέρω τους ατνίστοιχους όρους.

.

πως μπορώ να ξεπεράσω το πρόβλημα αυτό

- είτε να ανοίγω κατευθείαν το url και να βλέπω το html όπως εμφανίζεται στο τέλος (ότι φαίνεται στο developer tools)

- η να σώσω το html με τον ίδιο τρόπο σαν "manul" ώστε να σώζεται το "συμπληρωμένο" html

?

 

Επεξ/σία 5 Ιουνίου 2020 από DrLo

[Predatorkill]

Κανεις τη ζωη σου δυσκολη χωρις λογο

 

https://cloud.google.com/translate/

[DrLo]

5 ώρες πριν, Predatorkill είπε

Κανεις τη ζωη σου δυσκολη χωρις λογο

https://cloud.google.com/translate/

1. Δε θέλω κάποια εμπορική υπηρεσία

2. θέλω να κάνω αυτό που λέω οποσδήποτε μέσα από το Excel

3. Δε θέλω απαραίτητα μόνο για το "τυχαίο" παράδειγμα του google translate ... το ίδιο θέμα το έχω και για άλλες περιπτώσεις. 

[Lanike71]

Αν καταλαβαίνω καλά, θες να εκτελέσεις μία ερώτηση που εκτελείται με javascript μέσα από το excel vba και να πάρεις το αποτέλεσμα.

Χωρίς κάποια χρήση βιβλιοθήκης πώς μπορεί να γίνει αυτό; Έχει βιβλιοθήκες το excel;