Office: Daten aus Webseite auslesen

Hallo Leute,
ich habe wieder einmal ein Problem.
Ich habe hier eine umfangreiche Liste von Pflanzenschutzmitteln deren Inhalt sich von immer wieder ändern kann.
Damit ich nun nicht händisch die Webseite öffnen muss, und das bei über 300 Seiten, möchte ich die Seiten über einen Hyperlink öffnen und das Aktualisierungsdatum auf dieser Seite auslesen und in eine Exceltabelle eintragen, dann kann ich das Datum mit dem vorherigen Aktualisierungsdatum vergleichen und müsste dann nur bei unterschiedlichem Datum die Daten in meiner Datenbank anpassen.
Gibt es hier eine Möglichkeit das Aktualiasierungsdatum auszulesen und in die entsprechenede Zelle einer Exceltabelle einzutragen und wie funktioniert das ggfs.?
Siehe Testdatei.
Gruß Acolon

:)

 

Hallo Acolon,

schau mal hier, da hat schon jemand vorgearbeitet für Dich:
http://www.ms-office-forum.net/forum...5&postcount=21

Lösungsweg in diesem Beispiel:
- Webadressen stehen in Spalte C des Übersichtsblattes
- Webabfrage jeweils auf separatem Blatt
- Suchen und übertragen der notwendigen Informationen in Übersichtsblatt

Neben dem Aktualisierungsdatum ließen sich die anderen Infos gleich mit übertragen, wenn der Aufbau vergleichbar ist.

Mit wenigen Änderungen solltest Du Deine Tabelle und den Code anpassen können. Kommst Du damit klar?

Grüße
EarlFred

 

Ganz so einfach ist es wohl nicht. Je nachdem, auf welchem Server die MYSQL Tabelle liegt, da nur sehr wenige Provider überhaupt eine ODBC Verbindung zulassen. Einer der es zulässt, ist z.B, MW-Internet. Dann musst du dir noch den ODBC Connector installieren MySQL :: Download Connector/ODBC
Nach der Installation unter Systemsteuerung>Verwaltung>Datenquellen(ODBC) Reiter System DSN>Hinzufügen MYSQL ODBC...Driver, die Verbindung einrichten. Jetzt kannst du von Access aus, die Tabellen über Datei>externe Daten>ODBC Datenbanken die Tabellen verknüpfen.

 

Hallo iglaubi,

das ist mir neu, dass die excelinterne Webabfrage zusätzliche ODBC / MySQL-Treiber benötigt. Ich bin immer davon ausgegangen (und die bisherigen Ergebnisse schienen das zu unterlegen), dass die Wegbfrage ein etwas besserer "Fotoapparat" für Internetseiten ist, der die sichtbaren Inhalte versucht zu interpretieren und (halbwegs) strukturiert in Zellen abbildet.

Mag sein, dass ich mich da täusche, aber ich bin noch nie auf eine Webseite gestoßen (auch nicht bei verschiedenen Providern), die einen entsprechenden Treiber benötigt hätte. Aber man lernt ja nie aus!

Bei einer "richtigen" Datenbankverbingung wird das bestimmt anders aussehen, da fehlt mir jedoch zugegebenermaßen die Erfahrung.

Beim Thema

war ich allerdings auch stutzig, ob Acolon hier eine Datenbank oder eine Informationssammlung in Excel meint. Naja, er wird uns spätestens dann einen Tipp geben, wenn er nicht weiter kommt.

Grüße
EarlFred

 

Sorry, bin irgendwie im falschen Thread gelandet. Die Antwort war eigentlich für ein ganz anderes Thema bestimmt.

 

Hallo Earl Fred,
du hast ja vollkommem recht, wenn es nicht funktioniert, dann meldet er sich schon wieder.
Und da ist er!*mrcool
Vielleicht habe ich auch einige Begriffe falsch eingesetzt. Hier nochmal ein Versuch
Ich besuch Webseiten mit sehr viel unterschiedlichen Beschreibungen von Pflanzenschutzmittel (über 300) die von Zeit zu Zeit aktualisiert werden.
Damit ich nun nicht jedesmal alle Seiten händisch aufrufen muss, sehr zeitaufwendig, möcht ich mit einem VBA Code alle Mittel durchsuchen und nur das Aktualiesierungsdatum auslesen und mit dem vorherigen Vergleichen.
Damit läßt sich dann relativ einfach ermitteln welche Mittel ich mir erneut anschauen muss.
Das Aktualisierungsdatum soll in eine Exceltabelle geschrieben werden, neben der Vorgängerversion. Dann kann ich die gänderten Web-Seiten aufrufen und die für mich relevanten Daten in eine andere Excel-Tabelle eintragen.
Der Hyperlink zu den einzelnen Mittel steh in Spalte "A", das vorherige Aktualisierungsdatum steht in Spalte "B", das das neue Aktualisierungs Datum soll dann in Spalte "C" in der Zeile des Mittels eingetragen werden.
Gibt es hier eine Möglichkeit das Aktualiasierungsdatum auszulesen und in die entsprechenede Zelle einer Exceltabelle einzutragen und wie funktioniert das ggfs.?
Siehe Testdatei.
Gruß Acolon
Angehängte Dateien Test.xls (39,5 KB, 5x aufgerufen)

 

Hallo Acolon,

OK, das Grundprinzip war noch nicht ganz klar:
Das Makro greift eine Internetadresse aus Spalte C ab (also im "Klartext" stehend, wie z. B. "www.internetseite.Ort"). Bei Dir ist die Adresse im Hyperlink verborgen, das Makro sucht also nach dem "Freundlichen Namen", also dem Text, der in der Zelle sichtbar ist.
Entweder musst Du eine Spalte anlegen, wo die Adresse hinterlegt ist, oder auf den Hyperlink selbst zugreifen. Das ginge so:
Code:

Dazu würde dann freilich noch eine Abfrage gehören, ob hinter der Zelle überhaupt ein Hyperlink steht, sonst rennst Du in einen Fehler.

Zudem hast Du die Blätter vertauscht: In "Daten B" wird die Webabfrage zwischengespeichert und das Datum herausgelesen, dann in "Daten A" eingefügt. Habe ich der Einfachheit halber im Code angepasst.

Zudem habe ich im Blatt "Daten A" in Zeile 1 eine Überschrift spendiert. In Spalte D stünden dann die alten Datumswerte, in Spalte E würde das jeweils aktuell ausgelesene eingetragen.

So könnte der Code dann aussehen:

Code:

Wenn Dir die Arbeitsweise nicht klar ist, benutze bitte F8, um Dich zeilenweise durchzuarbeiten und wechsel immer auf das Blatt, auf das sich die Befehlszeile(n) beziehen. Dann solltest Du schnell dahinter kommen, was passiert und solltest in der Lage sein, Anpassungen vorzunehmen und auch andere Daten auszulesen - das ist eigentlich recht simpel, wenn der Aufbau der Internetseiten vergleichbar ist - siehe Beispiel!

Grüße
EarlFred

 

Hallo Earl Fred,
der Code funktioniert einwandfrei.
Vielen Dank für die Hilfe.
Das erspart mir viel Arbeit.
Nochmals vielen Dank.

Gruß Acolon

 

Hallo EarlFred,
ich habe die Anfrage nochmal auf unerledigt gesetzt, da ein Problem aufgetauch ist.
In der Webseite steht z.B. das Datum 3.10.2010 bei der Abfrage kommt folgendes Datum zurück 10.3.2010.
Kann man das erklären bzw. so ändern, dass das Datum aus der original Webseite so übernommen wird wie sie eingetragen ist.
Siehe auch beigefügte Test-Sheet.
gruß Acolon