Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
google hits - Webabfrage |
12.06.2006 23:46:16 |
Spindoctor |
|
|
|
13.06.2006 09:03:48 |
Rasta |
|
|
|
13.06.2006 10:50:46 |
Spindoctor |
|
|
|
13.06.2006 15:08:49 |
Rasta |
|
|
|
13.06.2006 16:46:42 |
Spindoctor |
|
|
|
14.06.2006 08:54:18 |
Rasta |
|
|
|
14.06.2006 13:18:14 |
Spindoctor |
|
|
|
15.06.2006 07:13:18 |
Rasta |
|
|
Von:
Spindoctor |
Datum:
12.06.2006 23:46:16 |
Views:
2170 |
Rating:
|
Antwort:
|
Thema:
google hits - Webabfrage |
Hallo!
Ich habe eine Liste mit über 700 verschiedenen Namen von Menschen, und möchte gerne daneben eine Liste mit der Anzahl der google-Hits haben.
Vielleicht gibt es dazu ja einen einfacheren Weg (dann bitte gleich sagen) aber ich hab mir das so vorgestellt:
In Zelle A1 steht der Name.
In Zelle B1 steht
=VERKETTEN("URL;http://www.google.com/search?q=";A1)
was
URL;http://www.google.com/search?q=[A1]
ausgibt.
Für die Zelle C1 hab ich folgendes Makro geschrieben:
Sub Makro2()
'
'
'
With ActiveSheet.QueryTables.Add(Connection:= _
Range"B1", Destination:=Range("C1" _
))
.Name = "search?hl=de&q=haus&meta="
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "8"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End Sub
Leider funktioniert dieses Makro aber nicht
Ich bin ein absoluter VBA-Noob. Was hab ich denn da falsch gemacht?
Ciao & Danke, Spin |
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
google hits - Webabfrage |
12.06.2006 23:46:16 |
Spindoctor |
|
|
|
13.06.2006 09:03:48 |
Rasta |
|
|
|
13.06.2006 10:50:46 |
Spindoctor |
|
|
|
13.06.2006 15:08:49 |
Rasta |
|
|
|
13.06.2006 16:46:42 |
Spindoctor |
|
|
|
14.06.2006 08:54:18 |
Rasta |
|
|
|
14.06.2006 13:18:14 |
Spindoctor |
|
|
|
15.06.2006 07:13:18 |
Rasta |
|
|