[caption id=“attachment_2370” align=“aligncenter” width=“300”] Blasendiagramm bzw. Bubble Chart in Excel[/caption]

Das Problem ist aber, dass dieses Blasendiagramm metrische oder mindestens ordinale Daten erfordert. Also Daten, die in eine natürliche Reihenfolge gebracht werden können. Was aber, wenn du Eigenschaften nominaler Daten visualisieren willst. Also z.B. die Einwohnerzahl und Fläche von Städten?

Der Stadtname soll dabei an der Y-Achse stehen, die Einwohnerzahl die Größe der Blasen definieren und die Position an der X-Achse über Fläche festgelegt werden. Die letzten beiden Dimensionen sind dabei [metrisch](- sie haben eine natürliche Reihenfolge und skalierbare Abstände. Aber die erste Dimension, die Städte-Namen, sind nominal. Du kannst sie nicht sortieren (die alphabetische Sortierung mal außen vor) und es gibt keine skalierbaren Abstände. Excel kann daraus also kein Bubble-Chart wie z.B: dieses machen:

[caption id=“attachment_2371” align=“aligncenter” width=“300”] Excel Blasendiagramm - Bubble Chart mit nominaler Skala[/caption]

Du ahnst es bereits: Das Diagramm stammt natürlich von Excel. Es ist nämlich, über ein paar Umwege, auch in Excel möglich, diese schönen Blasendiagramme zu erzeugen. Und wie, dass zeige ich dir jetzt.

Schritt 1: Die nominalen Daten mit einem Index versehen

Zunächst einmal zu den Rohdaten: Vor dir liegt eine Tabelle mit den Werten für die X- und Y-Achse sowie die Größe der Blasen. Wenn du daraus ein Blasendiagramm erzeugst, ignoriert Excel deine Städtenamen erst einmal ganz. Änderst du nun die Datenquelle der Y-Achse, kann Excel damit nichts anfange und du erhälst dieses nichtssagende Diagramm:

[gallery columns=“2” link=“file” ids=“2376,2375”]

Der erste Schritt ist ziemlich naheliegend: Du verpasst du den nominalen Daten einen Index, damit sind sie nämlich metrisch und können im Bubble Chart verwendet werden. Jede Stadt wird also einer Position auf der Y-Achse zugeordnet. Danach musst du die Datenreihe natürlich bearbeiten und die “Werte der Reihe Y” der neuen Spalte zuordnen. Für die folgenden Schritte musst du nur darauf achten, dass die Spalte der Y-Achse einmal alle Inde

[gallery columns=“2” link=“file” ids=“2373,2374”]

Dummy-Spalten einfügen

Das Ergebnis kann sich schon fast sehen lassen. Fast. Denn die Herausforderung ist nun, die Städtenamen an die Y-Achse zu bekomen. Bisher (Excel 16) gibt es dafür keine Möglichkeit. Das umgehst du mit zwei Dummy-Spalten. Die erste Dummy-Spalte sorgt dafür, dass die Städtenamen ihrer Position auf der Y-Achse finden, die zweite Dummy-Spalte gibt den Blasen eine Größe. Du fügst nun eine neue Datenreihe hinzu die auf diese Werte verweist. Das Ergebnis sind ein paar neue Bubbles auf deiner Y-Achse:

[gallery columns=“2” link=“file” ids=“2378,2377”]

Y-Achse mit Städtenamen schmücken

Du hast es fast geschaft. Als nächstes blenden wir die Dummy-Blasen aus und sorgen dafür, dass an deren Stelle Städte-Namen stehen. Zuerst fügst du die Datenbschriftung hinzu: Rechter Mausklick auf eine der Dummy-Blasen und dann den Punkt “Datenbschriftungen hinzufügen” anklicken. Nun formatierst du die Datenbeschriftungen. Also wieder mit der rechten Maustaste auf eine Dummy-Blase klicken und den Punkt “Datenbeschriftung formatieren” auswählen. Daraufhin geht ein Fenster auf, in dem du unter “Beschriftungs-Optionen” die erste Checkbox aktivierst: “Wert aus Zahlen”. Daraufhin öffnet sich eine kleine Dialog-Box. Du wählst nun einmal alle Städtenamen aus. Der Auswahlbereich darf aber nur so groß sein, dass jede Stadt genau einmal erfasst wird. Danach deaktivierst du die anderen Checkboxen darunter. Du bist auf der Ziellinie, mach das Fenster mit den Datenbeschriftungen aber noch nicht zu, das brauchen wir noch!

[caption id=“attachment_2379” align=“aligncenter” width=“300”] Dummy-Bubbles mit Datenbschriftung versehen[/caption]

Das Diagramm fertigstellen

Abschließend musst du nur noch ein wenig an der Formatierung schrauben: Dazu solltest du erstmal die Beschriftungsposition auf “Links” ändern. Dann wählst du die Dummy-Blasen aus und änderst Füllfarbe und Kontur auf “nix”. Jetzt kannst du noch die Y-Achse entfernen (anklicken und “ENTF” drücken) oder, wenn du die vertikale Linie behalten möchtest, die Schriftfarbe auf weiß setzen. Zack-Fertig: Blasendiagramm mit nominaler Skala:

[caption id=“attachment_2380” align=“aligncenter” width=“300”] Blasendiagramm - Bubble Chart mit nominaler Skala[/caption]

Eine Studie hat ergeben, dass 99 von 100 Bildschirmaufnahmen (neudeutsch Screenshots) mit dem Handy aufgenommen werden. Warum ist das falsch? Nun:

• Weil die Qualität der Aufnahmen mit dem Smartphone oft ziemlich schlecht ist,
• der staubige Bildschirm zusätzlich vom Wesentlichen ablenkt sowie
• Licht-Reflexionen oder Moiré-Effekte wichtige Inhalte verdecken.
• Außerdem muss man den Screenshot, wenn man ihn in einem Forum oder einer Social Media Gruppe präsentieren will, unter Umständen erst noch umständlich mit dem Smartphone speichern, ausschneiden, bearbeiten und irgendwo hochladen.
• Auf einem Smartphone-Foto ist nicht sofort ersichtlich, um welche Teile des Bildschirms es denn nun geht.

Konfuzius, ein berühmter buddhistischer Priester und begeisterter Internetnutzer, hat es mal so zusammengefasst:

Wer Screenshots im 21. Jahrhundert mit dem Handy im Hochformat aufnimmt, hat die Kontrolle über sein Leben verloren.

Dabei sind die technischen Möglichkeiten zur Aufnahme von Screenshots mittlerweile so viel mehr bequemer als noch zu Zeiten von Netscape und Microsoft DOS. Hier stelle ich die besten und vor allem einfachsten vor!

Screenshots in Mac OS X aufnehmen

Das Betriebssystem von Apple bietet schon eine ganze Weile eine Reihe von Shortcuts an, mit denen sich Bildschirminhalte als Bilddatei aufnehmen lassen:

1. Will man den gesamten Bildschirm aufnehmen und direkt als Datei speichern, drückt man die folgenden Tasten gleichzeitig: Umschalttaste-Befehlstaste(⌘)-3.
2. Soll nur ein bestimmter Bereich aufgenommen werden, lautet der Shortcut Umschalttaste-Befehlstaste(⌘)-4 - der Mauscursor wird zu einem Fadenkreuz um damit den gewünschten Bereich zu markieren
3. Zur Aufnahme eines Fensters drückt man ebenso Umschalttaste-Befehlstaste(⌘)-4 und danach die Leertaste. Nun lässt sich das Fenster per Mausklick auswählen.
4. Möchte man die Aufnahme nicht als Datei speichern, sondern in direkt in die Zwischenablage kopieren, drückt man zu den oben genannten Tastenkombinationen zusätzlich die CTRL-Taste

Die komplette Dokumentation dazu befindet sich hier: https://support.apple.com/de-de/ht201361

Mit der [neuen Version MacOS](führt Apple ein verbessertes Tool für Screenshots ein (Umschalttaste-Befehlstaste(⌘)-4). Nun gibt es einen Timer (5 oder 10 Sekunden) und eine kleine Oberfläche um den Bildschirmaufnahme bequemer zu konfigurieren.

Screenshots in Windows 10 aufnehmen

Windows von Hause aus eine noch größere Vielzahl von Möglichkeiten an, bequem Screenshots zu erstellen:

1. Das Snipping Tool zur Aufnahme und Bearbeitung von Screenshots ist schon seit Windows 7 Bestandteil des Betriebssystems. Es unterstützt die Aufnahme von beliebigen Bereich, dem ganzen Bildschirm oder sogar komplexer Formen. Außerdem lässt sich eine Verzögerung einstellen, um z.B. Hover-Effekte zu dokumentieren. Außerdem lassen sich bereich mit Farben einfach markieren. Wenn man das Snipping-Tool in der Taskleiste abgelegt hat, kann man über das Kontextmenü zu den Eigenschaften. Dort kann man eine Tastenkombination festlegen, um das Tool jederzeit schnell aufrufen zu können.

   [caption id=“attachment_1790” align=“aligncenter” width=“300”] Eigenschaften für das Snipping-Tool öffnen[/caption]

2. Den gesamten Bildschirm kann man auf einer Windows-Tastatur mit der Druck- bzw. PrtScr-Taste direkt in die Zwischenablage kopieren. Drückt man die Druck-Taste und Windows-Taste gleichzeitig, wird der Screenshot im Ordner Bilder - Screenshot als Datei abgelegt.

3. Nutzt man mehrere Monitore und will nur den gerade aktiven Bildschirm in die Zwischenablage packen, funktioniert das mit Alt+Druck-Taste.

4. Seit Windows 10 gibt es außerdem das Ink-Tool, das sich mit Windows-Taste+W aufrufen lässt und eine ganze Palette von zusätzlichen Funktionen mitbringt.

   [caption id=“attachment_1784” align=“aligncenter” width=“189”] Screenshot in Windows mit Ink erstellen[/caption]

5. Noch etwas komfortabler als das Snipping-Tool, aber kein Standard-Bestandteil von Windows, ist Snip .

Screenshot im Browser direkt aufnehmen

Auch die Browser-Hersteller haben erkannt, dass Screenshots wohl ein essentieller Bestandteil des Internets sind. So bieten die gängigsten Browser mittlerweile Funktionen zur Aufnahme des Bildschirms an.

1. In Firefox befindet sich die Funktion direkt im Kontext-Menü jeder Website. Damit lassen sich bestimmte Elemente der Seite, freie Bereich oder die ganze Seite als Screenshot in die Zwischenablage kopieren, als Datei speichern oder sogar in einer Firefox-Cloud ablegen um sie online unter https://screenshots.firefox.com/shots verfügbar zu machen!

   [caption id=“attachment_1789” align=“aligncenter” width=“300”] Screenshot in Firefox anfertigen[/caption]

2. In Chrome ist die Screenshot-Funktion leider etwas versteckt und nicht sehr komfortabel. Am schnellsten erreicht man diese über die Kommandofunktion. Zunächst muss man die Entwicklerkonsole öffnen indem man z.B. die Taste F12 oder Control+Shift+I drückt (Mac: Command+Option+I). Dann gelangt man mit Strg+Shift+P zur Auswahl der Chrome-Kommandos wo man nach der Screenshot-Funktion suchen kann. Der lange Weg führt übrigens über die Geräte-Toolbar, mit der Chrome verschiedene Geräteklassen simulieren kann (Ctrl+Shift+M). Dort muss erst oben die gewünschte Auflösung bzw. das Gerät auswählen. Über das kleine Menü in der rechten oberen Ecke gelangt man dann schließlich zur Screenshot-Funktion.[gallery ids=“1788,1787,1786”]

3. Der neue Microsoft Browser Edge ist hier wieder etwas komfortabler. Die Funktion befindet sich hinter dem Button “Notizen einfügen” (Pen & Stencil) rechts neben der Adressleiste. Das Tool bietet sehr viele Funktionen, um den Screenshot aufzunehmen und mit Notizen zu versehen.

   [caption id=“attachment_1785” align=“aligncenter” width=“294”] Screenshot anfertigen in Microsoft Edge[/caption]

Screenshot mit dem Smartphone aufnehmen

Du kannst natürlich nicht immer einen ausgewachsenen Computer zur Hand haben und manchmal will man tatsächlich etwas dokumentieren, was einem auf dem kleinen Smartphone-Bildschirm widerfahren ist. Bevor du dir dazu ein weiteres Smartphone nimmst um ein Foto von deinem Smartphone-Display zu machen: Zumindest Android hat seit geraumer Zeit eine Screenshot-Funktion eingebaut: Wenn du den An-/Aus-Button etwas länger drückst, erscheint ein Menü, in dem du die Wahl zwischen Screenshot und sogar einer Bewegtbild-Aufnahme des Bildschirms hast.

Zusammenfassung

Mit den hier beschriebenen Methoden landet der hochwertige Screenshot mit geringem Aufwand direkt in der Zwischenablage des Computers (oder als Datei in einem Ordner). Die meisten modernen Plattformen wie Facebook oder Twitter erlauben außerdem mittlerweile das direkte Einfügen von Bildern - also auch Screenshots - aus der Zwischenablage in den Beitrag oder Tweet (z.B. unter Windows mit CTRL+V). Man kann also innerhalb weniger Sekunden und mit wenigen Handgriffen einen ansehnlichen Screenshot erstellen, gegebenenfalls fragliche Bereich farblich hervorheben und dann in einen Beitrag auf Facebook kopieren.

Also, pack dein Smartphone weg oder nutze es für die wirklich wichtigen Dinge und überlasse die richtig guten Screenshots deinem Computer.

Anwendung der Excel-Vorlage für ISO-Toleranzen

Die Eingabemaske erwartet folgende Parameter:

• Bezeichnung der Bohrung / Welle
• das Nennmaß in Millimeter
• die Maßtoleranz in Mikrometer
• die oberen und unteren Abmaße in Mikrometer

Die übrigen Abmessungen werden automatisch berechnet. Außerdem erkennt die Excel-Tabelle, um welche Art von Passung es sich handelt: Übermaßpassung, Spielpassung oder Übergangspassung.

Hinweise

• Die Excel-Datei wurde mit Excel 2007 im XLSX-Format gespeichert. Das Arbeitsblatt erwartet zur korrekten Berechnung die Angabe des Nennmaßes (Nenndurchmesser) der Bohrung und der Welle. Weiterhin werden die Maßtoleranz sowie die jeweiligen oberen und unteren Abmaße benötigt. Die Eingabe erfolgt in den blauen Feldern mit normalen Zahlen; die Formatierung der Zellen ergänzt die Einheit selbstständig. Der Blattschutz kann jederzeit aufgehoben werden, er dient hier nur der Erleichterung der Eingaben.

• Da die Formeln WENN-DANN-Bedingungen enthalten, muss die Passung unbedingt angeben werden. Je nach Toleranzlage erfolgt die Angabe der unteren oder oberen Abmaße im entsprechend blau unterlegten Feld.

• Um die Bedienung zu erleichterter

• Wenn jemand die Toleranzwerte für Wellen und Bohrungen als CSV- oder Excel-Datei  zur Verfügung stellt, kann ich das Arbeitsblatt gerne derart modifizieren, dass die Toleranzparameter mit Angabe der Passung bereits automatisch erkannt werden.

Download der  Excel-Vorlage für ISO-Toleranzen

Unter Word 2010 lassen sich eigene Tastenkombinationen (Shortcuts) noch relativ einfach festlegen: Im Kontextmenü (Rechte Maustaste) des Menübandes (neudeutsch: [Ribbon](gelangt man zum Dialogfeld “Menüband anpassen” (Abbildung 1). Von dort geht es in das Dialogfeld “Tastatur anpassen” wo man sämtliche Word-Aktionen nach gusto mit Tastenkombinationen verknüpfen kann.

Allerdings ist es in Word nicht ohne weiteres möglich, auch eigene Makros mit Tastenkombinationen zu belegen. Der Umweg führt über ein paar  Zeilen VBA  und die Methode KeyBindings . Der Parameter  BuildKeyCode erwartet die gewünschte Tastenkombination. Und der Parameter Command schließlich die gewünschte Sub.

Sub Workbook_Open() With Application ’ Auf welches Dokument bezieht sich diese Änderung? ’ Alternativ “NormalTemplate” für das .CustomizationContext = ThisDocument

     ' die eigentliche Zuordnung beginnt hier
    .KeyBindings.Add **KeyCode**:=BuildKeyCode(wdKeyControl, wdKeyH), \_
    KeyCategory:=wdKeyCategoryCommand, \_
    **Command**:="MachWas"
End With

End Sub

Sub MachWas() MsgBox “Hallo Welt” End Sub

In Excel 2010 gibt es die Möglichkeit, Tastenkombinationen bestimmten Aktionen direkt zuzuordnen, allerdings nicht mehr. Dafür ist die Einbindung über VBA etwas weniger kompliziert möglich - dazu dient das Ereignis “ OnKey ”:

Private Sub Workbook_Open() Application.OnKey “+{H}”, “MachWas” End Sub

In PowerPoint schließlich funktioniert  die einfache Verwaltung der Tastenkombination ebenfalls nicht ohne Umwege. Abhilfe schafft das kostenpflichtige AddOn ShortCut Manager. Dieses ist 30 Tage lang kostenfrei nutzbar.

Vorbereitung in Excel

Zunächst kopierst du deinen Text in das Feld für den Quelltext. Per VBA wird daraus bereits automatisch eine Liste mit den Häufigkeiten der Wörter erstellt.

Mit den Werten für die PowerPoint-Höhe und -Breite legst du die Abmessung der Folie in der Präsentation fest. Je größer die Folie, desto länger dauert das Rendern der WordCloud. Mit der Größe der Schriftart bestimmst du, wie groß das größte Wort ist. Über den Faktor Höhenkorrektur kannst du den vertikalen Abstand der Textfelder korrigieren. Über den Performance-Faktor lässt sich die Geschwindigkeit der Verarbeitung steuern. Je höher der Wert, desto schneller das Skript, aber auch schlechter die Berechnung der Platzierung der Textfelder für die Wörter. Der Top-Wert legt fest, wie viele Wörter verarbeitet werden sollen.

Wenn du alles fertig eingestellt hast, drückst du auf Start und VBA verrichtet seine Arbeit.

Fertig.

*VBA und der Algorithmus sind eher nicht für lange Texte geeignet. Ein Text mit 349 unterschiedlichen Wörtern und 584 Wörtern insgesamt wird in 55 Sekunden gerendert.

In dieser kleinen Tutorial-Serie will ich anhand einer Online-Handy-Datenbank zeigen, wie man mit VBA Seiten aus dem Internet abruft und nach Informationen sucht, die sich dann in einer Tabelle abspeichern lassen. Warum VBA? Es gibt vermutlich elegantere Lösungen, doch Excel ist eine Software, die meisten zuhause nutzen. Man benötigt also keine zusätzliche Entwicklungsumgebung. Außerdem hat diese Methode den Vorteil, dass die Daten sofort zur weiteren Verarbeitung verfügbar sind. VBA ist vielleicht nicht die performanteste Programmiersprache, dafür aber relativ leicht zu beherrschen.

(FYI: Rechtliches zum Thema Web- oder Screen-Scraping)

Diese Artikelserie richtet sich an den fortgeschrittenen Nutzer. Für den Einsteiger gehe ich nicht auf grundlegendes Programmierwissen ein (was sind Klassen, welche Variablen-Typen bietet Excel, etc.) und für den professionellen Softwareentwickler sind meine Codebeispiele vermutlich zu einfach. Ich habe aber die Erfahrung gemacht, dass VBA und Excel für kurzfristige und kleine Projekte dieser Art recht nützliche Hilfsmittel sind. Außerdem bin ich kein “ausgebildeter Softwareentwickler”, weshalb ich an der Stelle auch gleich darauf hinweise, dass Verbesserungsvorschläge sehr gerne gesehen sind!

Welches Wissen solltest du also mitbringen? Da es um das Parsen von HTML-Code geht, solltest du zumindest Bescheid wissen, wenn ich von div- und a-Elementen und CSS-Klassen rede. Du solltest auch wissen, wie man in VBA Variablen deklariert oder was eine if-Abfrage ist.

Das Endergebnis ist eine Tabelle mit technischen Spezifikationen zu den Mobiltelefonen, die inside-handy.de listet. Insgesamt werden drei Routinen genutzt, die - in umgekehrter Reihenfolge des Vorgehens - folgende Aufgaben haben:

1. Die letzte Routine greift auf eine Liste von URLs zu, die auf die Datenblätter der Geräte verweisen. Von dort wird der HTML-Quellcode nach den technischen Informationen durchsucht.
2. Auf inside-handy.de sind die Geräte nach Herstellern sortiert. Jede Herstellerseite verweist auf die entsprechenden Geräte. Wir werden also jede Herstellerseite (bzw. den entsprechenden HTML-Code) zunächst nach den URLs zu den Geräten durchsuchen. Diese Aufgabe übernimmt die zweite Routine bzw. Prozedur.
3. Die erste Routine schließlich liefert die Liste aller URLs zu den Herstellern, die wir uns aus dem HTML-Code der Herstellerübersicht auf inside-handy.de laden.

Und damit geht es nun los:

1. Die URL zu den Hersteller-Unterseiten auslesen - sub getManufacturer

1.1 Datei per HTTP von einem Server laden

Im ersten Schritt laden wir die komplette HTML-Datei in den Zwischenspeicher. Dazu gibt es mindestens zwei Methoden, die gängigste ist vermutlich die über WinHttpRequest . Bevor du das nutzen kannst, musst du bei VBA unter Extras → Verweise die Microsoft HTML Object Library einbinden.

1Dim url As String
2Dim result As String
3Dim winHttpReq As Object
4url = "http://www.inside-handy.de/hersteller/handys"
5
6Set winHttpReq = CreateObject("WinHttp.WinHttpRequest.5.1")
7winHttpReq.Open "GET", url, False
8winHttpReq.send
9result = winHttpReq.responseText

Die Deklaration der Variablen erklärt sich von selbst. Nachdem ich eine Instanz vom WinHTTP-Objekt erzeugt habe, kann ich die Parameter übergeben. Dazu gehört neben der URL auch die Bestimmung des HTTP-Requests - nämlich GET. Der letzte, booleansche Parameter gibt an, ob die Verbindung im asynchronen Modus geöffnet werden soll. Mit .send wird der Request tatsächlich ausgelöst und das Ergebnis dann an die String-Variable result zurückgegeben. Dort befindet sich nun unser HTML-Code.

Wir können unseren Request natürlich auch per POST absetzen und noch andere Header-Informationen anhängen:

1Set winHttpReq = CreateObject("WinHttp.WinHttpRequest.5.1")
2
3winHttpReq.Open = "Post", url, False
4winHttpReq.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
5winHttpReq.setRequestHeader "Content-type", "application/x-www-form-urlencoded"
6winHttpReq.send (URLEncode("username=user1&password=secret"))
7
8result = winHttpReq.responseText

So ist es z. B. möglich, Formulardaten zu übermitteln, um an eine passwortgeschützte Seite oder die Ergebnisseite einer Suche zu gelangen. Dabei werden die POST-Daten als weiterer Parameter beim Senden mitgegeben. Eine weitere Möglichkeit ist die Durchführung einer HTTP-Authentifizierung:

1Dim HTTPREQUEST_SETCREDENTIALS_FOR_SERVER As Boolean
2
3winHttpReq.Open "GET", url, False
4winHttpReq.SetCredentials "user", "password", HTTPREQUEST_SETCREDENTIALS_FOR_SERVER
5winHttpReq.send

Neben dem winHttpRequest-Objekt gibt es noch eine weniger elegante Methode, in der direkt eine Instanz des Internet Explorers erzeugt wird:

 1Dim sPostData As String
 2Dim bPostData() As Byte
 3Dim WebBrowser: Set WebBrowser = CreateObject("InternetExplorer.Application")
 4
 5WebBrowser.Visible = True
 6
 7sPostData = URLEncode("username=user1&password=secret")
 8ReDim bPostData(Len(sPostData) - 1)
 9bPostData = StrConv(sPostData, vbFromUnicode)
10
11WebBrowser.navigate url, 2 + 4 + 8, , bPostData, "Content-type: application/x-www-form-urlencoded"
12Do While WebBrowser.Busy
13    DoEvents
14Loop
15result = WebBrowser.document.body.innerHTML 
16WebBrowser.Quit

Da diese Methode - wie gesagt - nicht sonderlich elegant ist, werde ich aber nicht weiter darauf eingehen.

HTML-Dokument erzeugen und befüllen

Nun zurück zu unserem Skript. Den HTML-Code der Seite haben wir nun erstmal in einen String gelegt. Damit wir das HTML-Dokument bequem lesen können, erzeugen wir ein HTML-Document, an das wir den HTML-Code übergeben:

1Set HTMLDoc = New HTMLDocument
2Set HTMLDoc = CreateObject("htmlfile")
3HTMLDoc.Open
4HTMLDoc.write (CStr(result))
5HTMLDoc.Close

Auch hier erklärt sich der Code fast von selbst: Eine Instanz des Objektes erzeugen, diese Instanz zum “Befüllen” vorbereiten, den String übergeben und die Instanz wieder “schließen”. Soweit, so unkompliziert. Im nächsten Schritt geht es nun direkt an das Parsen des Quellcodes, um die Links zu den Herstellerseiten zu erhalten.

Schleife zum Auslesen der Links

 1Dim oneElement1, allElements1 As IHTMLElementCollection
 2Dim oneElement2, allElements2 As IHTMLElementCollection
 3Dim oneElement3, allElements3 As IHTMLElementCollection
 4
 5Worksheets("srcURL").Range("a2").Select
 6i = 0
 7Set allElements1 = HTMLDoc.getElementsByTagName("a")
 8      
 9i = 0
10For Each oneElement1 In allElements1
11    If oneElement1.parentElement.className = "h_img" Then
12        If oneElement1.parentElement.parentElement.ID = "h_alle" Then
13            If InStr(1, oneElement1.getAttribute("href"), "/tablets") <= 0 Then
14                Selection.Offset(i, 0).Value = Replace(oneElement1.getAttribute("href"), "about:", "http://www.inside-handy.de")
15                i = i + 1
16            End If
17        End If
18    End If    
19Next oneElement1
20End Sub

Wie bin ich vorgegangen? Ich habe mir zunächst den Quellcode der Seite angeschaut. Die Liste der Hersteller ist dort eine Tabelle mit den Logos der Unternehmen. Die gewünschte Information befindet sich in a-Elementen, die wiederum innerhalb eines div-Elements liegen. Das gemeinsame “Oberelement” ist ein div-Container mit der CSS-Klasse h_img bzw. einem weiteren div-Container (h_alle). Außerdem gibt es einen ausgeblendeten div-Container mit einer Liste von Tablet-Herstellern, diese haben den Begriff "/tablet" in der href-Angabe und müssen ignoriert werden.

1<div id="h_alle">
2    <div class="h_img">
3        <a href="/hersteller/xyz" title="Handys Hersteller: XYZ">
4            <img />
5        </a>
6    </div>
7</div>

Mit Set allElements1 = HTMLDoc.getElementsByTagName("a") lasse ich mir also erst alle a-Elemente aus dem Quellcode in meinen “Container” legen.

Mit der ersten for-each-Schleife durchlaufe ich nun diesen Container und prüfe mit den ersten zwei if-Abfragen, ob sich das a-Element unterhalb der erwähnten div-Container befindet. Da auf der Seite noch ein weiterer identischer div-Container mit diesen CSS-Klassen für die Liste der Tablet-Hersteller existiert, muss ich mit einer dritten if-Abfrage die URL des a-Elements überprüfen. Erst dann kann ich das Attribut des a-Elements auslesen und in mein Excel-Worksheet schreiben.

Fertig ist der erste Schritt - eine Liste der URLs zu den jeweiligen Herstellern. Im nächsten Teil werde ich diese Liste durchgehen und von den jeweiligen Seiten die URLs zu den Geräten auslesen.

Häufig gestellte Fragen rund um Windows und Windows-Programme.

Skype & HTTP-Server

? Mein Webserver (z. B. Apache) läuft nicht, wenn Skype gestartet ist.

! Skype benutzt zum Kommunizieren den HTTP-Port 80, der auch vom Apache-Webserver benötigt wird. Entweder man ändert den Port des Apache-Servers 1 oder du änderst den Port in Skype 2 .

Desktop-Link in Quicklaunch

? Aus meiner Schnellstartleiste ist das Symbol zum Anzeigen des Desktops verschwunden.

! Unter %username%\Anwendungsdaten\Microsoft\Internet Explorer\Quick Launch eine Datei mit dem Namen Desktop anzeigen.scf mit folgendem Inhalt ablegen:

1[Shell]
2Command=2
3IconFile=explorer.exe,3
4[Taskbar]
5Command=ToggleDesktop

Skype vom USB-Stick starten

? Wie starte ich Skype vom USB-Stick, ohne dafür externe Anwendungen zu nutzen?

1. Die Skype-Programm-Dateien in einen Unterordner auf den USB-Stick kopieren, z. B.: X:\Skype.
2. In diesem Ordner ein Unterverzeichnis erstellen: X:\Skype\userfiles.
3. Den Inhalt von Dokumente und Einstellungen\%username%\Anwendungsdaten\Skype nach X:\Skype\userfiles kopieren.
4. Eine Batchdatei erstellen: skype.cmd mit folgendem Inhalt:

1@start skype.exe \removable \datapath:"\userfiles\" .
2@rem - unterdrückt die Anzeige des Befehls im DOS-Fenster
3@rem - sorgt dafür, dass das DOS-Fenster wieder geschlossen wird, nach dem Skype-Start

Word stürzt beim Start ab

? Im Laufe der Zeit kommt es immer wieder zu Abstürzen von Word. Weder eine Neuinstallation noch andere Reparaturmaßnahmen helfen.

1. Schuld ist die Vorlagendatei “normal.dot”, die im Laufe der Zeit bestimmte Vorlagen und Einstellungen für Word beinhaltet.
2. Abhilfe schafft ein Umbenennen dieser Vorlagendatei.
3. Findet Word keine normal.dot, wird eine neue, frische angelegt.

• MS Knowledge Artikel

ActiveSync stellt keine Verbindung zum PocketPC her

? Mein XDA / VPA / MDA / PocketPC / PDA kann sich nicht mit ActiveSync verbinden.

! Auch wenn die IP-Adresse auf dem Computer und dem mobilen Gerät per Hand vergeben wurde, kann ActiveSync ohne den Windows-Dienst “DHCP-Client” keine Verbindung herstellen. Wenn dieser Dienst in der Diensteverwaltung aktiviert wird, funktioniert auch die Verbindung über ActiveSync.

hal.dll

? hal.dll fehlt oder ist beschädigt, Windows bootet nicht, Systemwiederherstellung und der abgesicherte Modus funktionieren nicht?

! hal.dll wurde gelöscht, boot.ini ist leer oder fehlt ganz.

1. Von der Original-Windows-XP-CD booten und die “Wiederherstellungskonsole” starten.
2. hal.dll fehlt:
   1. Per Kommandozeile die hal.dll direkt von der Windows-CD in den system32-Ordner kopieren.
3. boot.ini fehlt:
   1. bootcfg /rebuild erstellt eine neue boot.ini.
4. boot.ini ist leer:
   1. bootcfg /add fügt das Betriebssystem wieder zur boot.ini hinzu.

• kb291980

Der Ordner “Windows\Installer"

? Der Ordner Windows\Installer ist sehr voll, kann ich die Dateien einfach löschen?

! Dieser Ordner enthält die Installationsroutinen der Programme, die mit dem Windows Installer installiert wurden, nicht jedoch die Programmdateien selber. Die Dateien werden benötigt, um die Programme wieder korrekt entfernen zu können. Microsoft bietet auf seiner Seite ein Tool an, das verspricht, diesen Ordner aufräumen zu können: Windows Install CleanUp .

Windows Installer sucht nach Installationspaketen (*.msi) beim Öffnen…

? … verschiedener Programme. Beim Öffnen von Word, den Druckeinstellungen oder anderen Programmen versucht der Windows Installer auf ein Installationspaket zuzugreifen, das nicht mehr existiert.

! In diesem Fall gibt es einen Konflikt mit einem möglicherweise nicht mehr vorhandenen Programm auf dem Computer. Nennt der Windows Installer die Installationsroutine des Programms, kann man direkt per Windows Install CleanUp das entsprechende Programm aus der Datenbank entfernen. Windows Install CleanUp .

Dialog für Speichern und Öffnen anpassen

? Beim Herunterladen von Dateien mit dem Internetbrowser oder beim Öffnen und Speichern von Dateien mit verschiedenen Programmen erscheint ein Dialogfenster, in dem man den Speicherort und Dateiname angibt. Auf der linken Seite sind einige Speicherort des Computers vorgegebn. Kann man diese Liste ergänzen?

! Bei den Microsoft Office Produkten geschieht das ganz einfach über das Menü “Extras” im Dialogfenster selber und dort die Option “zu Favoriten hinzufügen”. Diese Einstellung gilt jedoch nicht systemweit. Um das zu erreichen erstellt man in der Registry unter HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies einen Schlüssel mit dem Namen comdlg32. Unterhalb dieses Schlüssels erstellt man nun einen weiteren Schlüssel mit dem Namen Placesbar. Unter diesem Schlüssel kann man jetzt maximal 5 Einträge anlegen. Jeder Schlüssel muss hier den Namen Place0 bis Place4 tragen und es gibt zwei verschiedene Typen. Lautet der Typ DWORD erwartet der Schlüssel einen der folgenden Werte für die Standardsystemordner:

10 - Desktop
25 - Eigene Dateien 
36 - Favoriten
48 - Zuletzt verwendete Dokumente
511 - Arbeitsplatz
612 - Netzwerkumgebung

Eigene Orte und Verzeichnisse kann man direkt eingeben, wählt man als Typ Zeichenfolge. Das folgende Beispiel zeigt, dass weder die Gross-/Kleinschreibung noch der abschließende Backslash \ beachtet werden müssen. Achtung, da es sich hierbei um einen exportierten Registryeintrag handelt, der in dieser Form wieder importiert werden kann, sind die Backslashes doppelt vorhanden. Bei der direkten Eingabe in den Registryeditor darf natürlich nur ein Backslash verwendet werden. Windows Registry Editor Version 5.00

1\[HKEY\_CURRENT\_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\comdlg32\\Placesbar\]"Place0"=dword:00000000"Place1"="j:\\\\dokumente\\\\studium\\\\""Place2"="c:\\\\teMP""Place3"="j:\\\\incomming""Place4"=dword:00000005

Möchte man die Standardeinstellung wiederherstellen, löscht man den zuerst erstellten Schlüssel comdlg32.

DNS Server bei einer Fritzbox nachtragen

? Es gibt bei meiner Fritzbox im Webinterface nicht die Möglichkeit, einen anderen DNS-Server einzutragen.

! Der umständliche Weg, der in vielen Foren empfohlen wird, lautet “Telnet”. Die einfachste Lösung ist jedoch, den bzw. die DNS Server mit dem FBEditor (Download von IP Phone Forum.de nachzutragen. Das Programm benötigt eine Java Runtime Enviroment (Download von java.com .

Automatisch die urlfilter.ini von Opera aktualisieren

Opera bietet zwar eine eigene Filterliste die als AdBlock fungiert, jedoch wird diese nicht automatisch aktualisiert. Folgende Anleitung ermöglicht jedoch, die tägliche Aktualisierung dieser Liste. Benötigt wird:

1. wget von gnuwin32.sourceforge.net

von dort die Binaries im ZIP-Archiv

sowie die Dependencies im ZIP-Archiv

1. eine regelmäßig aktualisierte urlfilter.ini, wie z.B. von:

• http://fanboy.co.nz/adblock/
• http://pgl.yoyo.org/as/
• http://www.urlfilter.de/tag/urlfilterini/

Vorgehensweise:

1. Erstelle eine Batchdatei (mit der Endung .cmd) mit folgendem Inhalt, die du mit den WGet-Dateien in ein Verzeichniss kopierst.

1@wget -b -q -N -o update.log -O%AppData%\\Opera\\Opera\\urlfilter.ini http://fanboy.co.nz/adblock/opera/complete/urlfilter.ini "http://fanboy.co.nz/adblock/opera/complete/urlfilter.ini"
2@rem -b Im Hintergrund ausführen
3@rem -q "Leise" ausführen, keine Ausgaben@rem -N nur Dateien herunterladen, die aktueller sind

1. Hinweis 1: Die Urlfilter.ini befindet sich bei einer gewöhnlichen Installation im o.g. Verzeichnis. Wer sich über den Ort nicht sicher ist, findet den korrekten Speicherort über die Adresse opera:config (einfach in die Adresszeile eingeben) - dort im Suchfenster urlfilter eingeben und den korrekten Speicherort für die Batchdatei erhalten
2. Hinweis 2: Ich verwende die filterini von fanboy.co.nz; die Größe der Datei kann sich natürlich negativ auf die Geschwindigkeit von Opera auswirken, wer will, kann hier auch den Pfad zu einer anderen urlfilter.ini hinterlegen
3. Hinweis 3: Die Zeilen nach der 1. Zeile können natürlich weggelassen werden, sie dienen nur der Erklärung
4. Führe nun die erstellte Batchdatei aus. Nach kurzer Zeit wirst du feststellen, dass die urlfilter.ini aktualisiert wurde. Manchmal lohnt es sich einen Augenblick zu warten, da die Datei, solange sie von dem Skript noch in Bearbeitung ist, für einen kurzen Augenblick leer erscheint
5. Wer möchte, kann nun über den Taskplaner von Windows eine Aufgabe erstellen, die diese Batchdatei bei Bedarf einmal täglich oder wöchentlich ausführt

Fonts / Schriftart lässt sich nicht installieren

? Bei der Installation von Schriftarten unter Windows kommt es öfter zu Fehlermeldungen, dass z.B. die Datei beschädigt sei.

! Wenn der Treiber der Grafikkarte mehr Speicher anfordert, als Windows es “gewohnt” ist, kann es zu dieser Fehlermeldung kommen. Um das zu beheben ist muss in der Registry unter

1HKEY\_LOCAL\_MACHINE\\SYSTEM\\CurrentControlSet\\Contro l\\SessionManager\\MemoryManagement

der Wert

1REG\_DWORD

mit einem Inhalt von mindestens

120

gesetzt werden. Nach einem Neustart sollte das Problem behoben sein.

Nach Update der Mediawiki-Software fehlen Thumbnails der Bilder

Wenn die Mediawikisoftware aktualisiert wurde, werden Thumbnails entweder garnicht oder nur schwarz angezeigt. Um das Problem zu beheben, einfach den Thumbnail-Ordner im Verzeichnis “Images” im Mediawiki-Verzeichnis loeschen oder umbenennen. Die Softwar erstellt dann neue Thumbnails.

Externer Datenträger / Festplatte schreibgeschützt

? Ich kann plötzlich keine Daten mehr auf meine Festplatte schreiben oder darauf löschen.

! Windows hat unbemerkt einen Fehler im Dateisystem festgestellt bzw. wurde die Platte einfach nur vom Computer getrennt, oder sie sauber bei Windows zu “entmounten”. Um das Problem zu genügen, reicht es, den Befehl

1chkdsk k: /x

auszuführen. Entweder im Ausführen-Dialog (Windowstaste + R) oder direkt in der Konsole (cmd). k: entspricht dabei dem Laufwerks-Buchstaben des externen Datenträgers und /x ist die Option, die Windows nun dazu veranlasst, den Fehler zu beheben und den Schreibschutz wieder aufzuheben.