VBA IE Popup öffnen und Bild kopieren

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Sub JS_Funktion_aufrufen() Dim browser As Object Dim url as string url = "https://wertpapiere.ing-diba.de/DE/Showpage.aspx?pageID=25&ISIN=DE0008404005&" Set browser = CreateObject("internetexplorer.application") browser.Visible = True browser.Navigate url Do Until browser.ReadyState = 4: DoEvents: Loop 'Aufruf einer JS Funktion nach dem Muster: 'Call browser.document.parentWindow.execScript("FUNKTIONSNAME(PARAMETER)", "JavaScript") Call browser.document.parentWindow.execScript("__doPostBack('ctl00$WebPartManager$ _ wp43346709$wp44614289$ChartImagePopupLink$Control$dialogLink_showChartImagePopup','')", "JavaScript") End Sub

Hallo Christian,
ich öffne mal einen neuen Ast in diesem Thread, weil in der Forenübersicht zuletzt ein Beitrag von mir angezeigt wird. Wie man aber in der Liste der Antworten sieht, wenn man Deinen ersten Beitrag öffnet, haben sowohl Du, wie auch Mullit nochmal geantwortet. Das hat sicher mit den Forenproblemen von Vorgestern zu tun.
Wie auch immer. Ich habe rausgefunden, wie man an den Bilderlink kommt. Falls Du hier noch reinschaust, sag mal bitte bescheid, ob Du noch eine Lösung für das Problem suchst. Mullit, falls Du das hier liest, ich bin an Deinem Ansatz interessiert. Eine Textbeschreibung zum Vorgehen/ zum Algorithmus würde mir reichen :-)
Falls ja:

Willst Du die Bilder öfter runterladen? Sprich, muss ein bereits vorhandenes evtl. vorher aus der Zelle gelöscht werden?

Die Grafik ist relativ groß für eine Exceltabelle, falls mehrere rein sollen. Soll die auf einen bestimmten Wert/ bestimmte Kantenlängen skaliert werden?

Willst Du die Liste inklusive der Grafiken auch sortieren? Dann würde ich die Grafik an die Zelle tackern und dafür sorgen, dass sie sich mitsortieren läßt.

Werden die Grafiken, die Du runterladen willst, alle über die gleiche JavaSript Funktion runtergeladen? Ansonsten müsstest Du meine Lösung genau verstehen, um andere JS Funktionsaufrufe evtl. selbst verarbeiten zu können.

Viele Grüße,
Zwenn

Hi Christian,
kein Problem, dass Du im Stress warst. Kenne ich selbst. Ich wollte nur wissen, ob Du das Problem vielleicht schon gelöst hast, bevor ich mir weitere Arbeit mache :-)
Wie groß ein Bild bei Dir ist, damit Du es grade noch erkennst weiß ich nicht ;-) Ich versuche mal was einzubauen, wo Du dann einfach selbst die maximale Kantenlänge über eine Konstante bestimmen kannst. Die Kantenlänge selbst ist kein Problem. Ich überlege nur noch, wie man die Zellen automatisch mit skaliert. Sonst macht das keinen Sinn. Außer Du kannst mir direkt sagen, wie breit oder wie hoch ein Chart in Pixeln aufs Bild bezogen sein soll. Dann spare ich mir die automatische Zellskalierung und setze die Zellgrößen fix.
Wenn die Bilder neu geladen werden, müssen sie auf jeden Fall vorher gelöscht werden. Sonst würde man bei jeder Aktualisierung ein weiteres Bild auf die vorher geladenen schieben und Deine Datei würde immer größer werden.
Was Du mit Die Punkte in die die Bilder kopiert werden sind dabei immer gleich. meinst weiß ich nicht. Ich denke Bild 1 soll in Zelle B2. Also gehe ich davon aus, dass Bild 2 in B3 angezeigt werden soll, usw.
Ob Du die Liste umsortieren willst erkenne ich aus Deiner Antwort auch nicht richtig. Vielleicht ist es für das Verständnis meiner Frage danach wichtig zu wissen, dass eine Mitsortierung von Grafiken in Zellen nur mit einem kleinen Trick möglich ist. Sofern MS das nicht inzwischen geändert hat.
Runtergeladen werden die Bilder auf jeden Fall, denn sie kommen ja aus dem Internet ;-) Es gibt jedoch die beiden Möglichkeiten sie entweder auf der Festplatte zu speichern und von dort aus in die Excel Tabelle zu holen oder sie direkt in die Excel Tabelle zu laden. Ich ziehe das direkte Laden in die Tabelle in Deinem Fall vor.
Ich habe mit der Umsetzung dieses Projektes zwar schon angefangen, werde aber aus persönlichen Gründen am Wochenende wahrscheinlich nicht dazu kommen es fertig zu stellen (Besuch hat sich angekündigt). In diesem Zusammenhang mal die Frage ... Hast Du schon einen eigenen Versuch gestartet? Dann wäre es gut, wenn Du Deine Arbeitsmappe hier hochladen würdest, damit ich mindestens auf Deinem Tabellenlayout aufsetzen kann.
Viele Grüße,
Zwenn

Beliebteste Forumthreads (12 Monate)

VBA IE Popup öffnen und Bild kopieren

15
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

301 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

VBA IE Popup öffnen und Bild kopieren

15 Beiträge zum Forumthread Beiträge zu diesem Forumthread

301 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

15
Beiträge zum Forumthread

Beiträge zu diesem Forumthread