Import des Quellcode von Website (VBA Script)
#1
Hallo zusammen,

zuallererst möchte ich mich schon mal im voraus für jedwede Hilfe bedanken!

Wie im Betreff schon genannt, suche ich eine Möglichkeit meinen Alltag mit einen VBA Script zu erleichtern.
Doch leider gehört VBA Script schreiben (momentan noch) nicht zu meinen Stärken, daher hoffe ich auf einen erfahrenen Nutzer.

Prinzipiell stellt sich die Problematik wie folgt dar: ich möchte den aktuellen Sendungsstatus (Status, TT.MM.JJJJ, SS:MM) meiner Sendungen aus der Sendungsverfolgung einer Spedition in Excel importieren bzw. Abrufen (aus Datenschutzgründen kann ich die Original Tabelle hier nicht einbauen, bei Rückfrage würde ich diese aber neutral nachbauen Smile) anbei die generellen Eckpunkte:

1. Der Link zur Sendungsverfolgung lautet: "http://srv4.thalmaier.de/gel/send/DE-de/Sendungssuche.aspx?snr=", die Sendungsnummern verfügen immer über 10 Ziffern, welche nahtlos nach dem "=" kommen und so den kompletten Link erzeugt. 

Im Seitenquelltext, befinden sich von Zeile 209 bis 222 die gewünschten Infos die ich benötige.

---

span id="MainContent_lblTitleSendungsstatusNow">Aktueller Status vom 04.01.2019 um 06:56 Uhr:
span id="MainContent_lblSendungsstatusNow">Sendung in Zustellung

---

2. Zur Tabelle: ab Spalte Q16 (fortlaufend) befinden sich eine täglich wachsende Anzahl von Sendungsnummern, ab der Zeile AY16 soll der Status und ab in AZ16 Uhrzeit und Datum der dazugehörigen Sendungsnummer wiedergegeben werden. Da es sich hierbei um eine Tabelle handelt, die nach einem halben Jahr 15,000 Postionen haben "könnte", habe ich Spalte L16 eine Prüfung eingebaut (wenn zugestellt AY16 = "P", wenn nicht AY16 = "O"). Hintergrund hierfür war: das dies im Script ggf. realisierbar wäre, das nur abgerufen wird wenn hier "O" angegeben ist. ich hätte hier sonst die Angst das das laden stunden dauern könnte.

Die Frage die sich mir nun stellt wäre, ist dies realisierbar?

Falls ja, könnte ich auch eine Muster Sendungsnummer zur Verfügung stellen.

Danke für Antworten.

Mit freundlichen Grüßen
Neuer83
Top
#2
Hallo,

zu finden auch hier http://www.office-loesung.de/p/viewtopic.php?f=166&t=793255

Gruß
Microsoft Excel Expert · Microsoft Most Valuable Professional (MVP) :: 2011-2019 & 2020-2022 :: 10 Awards
https://de.excel-translator.de/translator :: Online Excel-Formel-Übersetzer :: Funktionen :: Fehlerwerte :: Argumente :: Tabellenbezeichner
[-] Folgende(r) 1 Nutzer sagt Danke an maninweb für diesen Beitrag:
  • schauan
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste