Generieren einer Keyword-Vorkommensliste (Microsoft Excel)
Martyn hat ein Arbeitsblatt, das in Spalte B einige Schlüsselwörter enthält.
Jede einzelne Zelle kann eine beliebige Anzahl eindeutiger Schlüsselwörter enthalten, die jeweils durch ein Leerzeichen getrennt sind. Er benötigt eine Möglichkeit, eine Liste eindeutiger Schlüsselwörter zusammen mit der Anzahl der Zeilen zu erstellen, die jedes Schlüsselwort enthalten.
Es gibt keine einfache Möglichkeit, die Keyword-Liste mithilfe von Formeln zu generieren. Sie können eine solche Liste jedoch mithilfe eines Makros schnell bearbeiten. Das Folgende ist ein Beispiel, das die Arbeit sehr schnell erledigt.
Sub KeywordList() Dim dTally As Dictionary Dim rSource As Range Dim c As Range Dim d As Variant Dim aKeys() As String Dim J As Integer Dim sTemp As String Set dTally = New Dictionary Set rSource = Selection For Each c In rSource ' Put all keywords in an array aKeys = Split(c, " ") For J = LBound(aKeys) To UBound(aKeys) sTemp = LCase(Trim(aKeys(J))) If Len(sTemp) > 0 Then If dTally.Exists(sTemp) Then ' Increment existing keyword dTally(sTemp) = dTally(sTemp) + 1 Else ' Add new keyword and count dTally.Add sTemp, 1 End If End If Next J Erase aKeys Next c ' Now have all the keywords in a dictionary object ' Add a new worksheet to store the list Worksheets.Add Cells(1, 1) = "Keyword" Cells(1, 2) = "Count" J = 1 For Each d In dTally.Keys J = J + 1 Cells(J, 1) = d Cells(J, 2) = dTally(d) Next d End Sub
Wenn das Makro auf Ihrem System nicht funktioniert, kann dies daran liegen, dass Excel das Dictionary-Objekt nicht erkennt. Wenn Sie vermuten, dass dies der Fall ist, stellen Sie sicher, dass Sie die Microsoft Scripting Runtime-Bibliothek in VBA aktivieren. (Sie tun dies im Visual Basic-Editor, indem Sie auf Extras | Referenzen klicken, die Bibliothek suchen, auf das Kontrollkästchen daneben klicken und schließlich auf OK klicken.)
Um das Makro zu verwenden, wählen Sie einfach die Zellen aus, die die Schlüsselwörter enthalten, die Sie zählen möchten (in Martyns Fall wären dies die Zellen in Spalte B), und führen Sie dann das Makro aus. Es wird ein neues Arbeitsblatt erstellt, in dem die Schlüsselwörter in Spalte A und in Spalte B aufgeführt sind, wie oft jedes Schlüsselwort vorkommt.
Wie geschrieben, achtet das Makro nicht auf die Groß- und Kleinschreibung der Schlüsselwörter. Dies bedeutet zum Beispiel, dass „Orange“ dasselbe ist wie „Orange“. Wenn bei der Keyword-Liste zwischen Groß- und Kleinschreibung unterschieden werden soll, müssen Sie lediglich die LCase-Anweisung entfernen. Es wird nur einmal im Makro verwendet.
Beachten Sie auch, dass die Schlüsselwörter im neuen Arbeitsblatt in der Reihenfolge aufgeführt sind, in der sie in der Auswahl vorkommen, die Sie vor dem Ausführen des Makros treffen. Sobald Sie sich im Arbeitsblatt befinden, können Sie die Schlüsselwörter bei Bedarf einfach sortieren.
ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.
Dieser Tipp (13499) gilt für Microsoft Excel 2007, 2010, 2013 und 2016.