Verknüpfen von Website-Daten mit einer Excel-Tabelle

571
Jacob K

Ich bin mir nicht sicher, ob das, was ich erreichen möchte, überhaupt möglich ist, aber ich dachte, ich würde fragen. Ich habe eine Tabelle in anständiger Größe mit Spezifikationen von hunderten verschiedenen Smartphones, an denen ich als eine Art Haustierprojekt für mich arbeite, und ein Tech-Forum, an dem ich teilnehme. Eine der Spalten, die ich habe, ist die "Fan Count" von GSMarena.com als Mittel zur Quantifizierung der Beliebtheit und des Interesses an dem Gerät. (Die beiden anderen Spalten links sind "PhoneArena Staff Rating" und "PhoneArena User Rating".) GSM Arena Fan Count

Für den Moment muss ich nur den Betrag manuell eingeben, aber das kann bei so vielen Telefonen langweilig werden und wie oft sich die Anzahl ändert. Was würde ich gerne wissen, wenn es eine Möglichkeit gibt, die "Fan Count" -Nummer automatisch aus den Quelldaten der Webseite von x phone zu ziehen?

Verknüpfen von Website-Daten mit einer Excel-Tabelle

Natürlich könnte ich es nicht für jedes Telefon suchen lassen, aber wenn ich zumindest die Quelleninformationen für jedes Telefon eingeben und die Nummern dann selbst aktualisieren kann, wäre das ausreichend.

0
Möglich = ja Schwierig auch = etwas ja. Sie müssen vba ohne Zweifel verwenden, aber es gibt verschiedene Methoden, mit denen Sie eine Webseite per URL herunterladen und die HTML-Form davon anzeigen können. Sobald Sie die HTML-Datei haben, ist es einfach eine Frage, ob Sie sie analysieren, um Ihre Nummer zu finden Eric F vor 8 Jahren 0

1 Antwort auf die Frage

1
Eric F

Hier ist ein gutes Beispiel für den Einstieg. Wie ich in meinem Kommentar gesagt habe, müssen Sie VBA verwenden, um das zu erreichen, was Sie möchten. Die grundlegende Methode ist, VBA zum Starten des Internet Explorers zu verwenden und dann den HTML-Code zurückzubringen. Innerhalb dieses Codes müssen Sie den Text durchsuchen, um herauszufinden, wo sich Ihre Nummer befindet.

Im Folgenden finden Sie eine Methode, um das HTML für eine Seite zurückzugeben:

Sub getData()  Dim url As String Dim ie As Object Dim state As Integer Dim text As Variant   Set ie = CreateObject("InternetExplorer.Application")  ie.Visible = 0  url = "http://www.eoddata.com/stockquote/NASDAQ/AAPL.htm" ie.Navigate url   state = 0 Do Until state = 4 DoEvents state = ie.readyState Loop  text = ie.Document.Body.innerHTML  End Sub 

Natürlich ändern Sie die URL in die URL Ihrer Website. Sobald Sie dies eingerichtet haben, enthält der variable Text am Ende den HTML-Code. Verwenden Sie daher die beliebige Creative-Methode, die Sie durch diesen Code durchsuchen möchten. Sie möchten wissen, wie Sie die Befehle MID, FIND und TRIM verwenden.

Hoffentlich fängt man damit wenigstens an

Danke für die Information. Sieht aus, als müsste ich anfangen, VBA zu studieren. Jacob K vor 8 Jahren 0
Es ist wirklich der einzige Weg und es ist nicht so schlimm zu lernen. Zumindest haben Sie hier ein gutes Beispiel. Eric F vor 8 Jahren 0