Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1660to1664
1660to1664
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Hashtags aus Zelle auslesen

Forumthread: Hashtags aus Zelle auslesen

Hashtags aus Zelle auslesen
05.12.2018 18:41:44
Triola
Hallo, ich bin Excel-Anfänger und schaffe es leider nicht aus eigener Kraft, die Schlagwörter respektive Keywords in einer Zelle anzeigen zu lassen bzw. auszulesen. Diese sollten mit einem Komma getrennt sein und das Hashtag nicht enthalten.
Beispiel-Satz:
#Samsung rollt #android 6.0.1 #Marshmallow nun auch für das europäische Galaxy S5 aus.
Neue Zelle sollte enthalten: Samsung, android, Marshmallow
Wer kann mir helfen?
Beste Grüße & Danke
Triola
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Hashtags aus Zelle auslesen
05.12.2018 23:39:04
Frank
Hallo, gibt es verschieden vieleHastags in einer Zelle..?
AW: Hashtags aus Zelle auslesen
06.12.2018 05:51:09
Triola
Ja, leider. Mir würden aber maximal drei ausgelesene Hashtags/Keywords genügen.
AW: Hashtags aus Zelle auslesen
06.12.2018 08:25:50
hary
Moin
Wenn VBA erlaubt ist, dann ginge es mit einer UDF.
Code in ein Modul. 
Function auslesen(Zelle As Range) As String
Dim a
Dim i As Long, Ausgabe As String, Anzeige As String
a = Split(Zelle, "#")
For i = 1 To UBound(a)
Anzeige = Left(a(i), InStr(1, a(i), " ")-1)
Ausgabe = IIf(Ausgabe = "", Anzeige, Ausgabe & ", " & Anzeige)
Next
If Ausgabe  "" Then auslesen = Ausgabe
End Function

Aufgerufen wird die Function mit =auslesen()



Tabelle1
 AB
1#Samsung rollt #android 6.0.1 #Marshmallow nun auch für das europäische Galaxy S5 aus. Samsung , android , Marshmallow
2Samsung rollt android 6.0.1 #Marshmallow nun auch für das europäische Galaxy S5 aus. Marshmallow
3Samsung rollt android 6.0.1 Marshmallow nun auch für das europäische Galaxy S5 aus.  

verwendete Formeln
Zelle Formel Bereich R1C1 für Add In
B1:B3=auslesen(A1)  =auslesen(RC[-1])

http://excel-inn.de/dateien/vba_beispiele/tabellenanzeige_in_html_addin.zip
http://hajo-excel.de/tools.htm
XHTML-Tabelle zur Darstellung in Foren, einschl. der neuen Funktionen ab Version 2007
Add-In-Version 14.02 einschl 64 Bit

gruss hary
Anzeige
AW: Hashtags aus Zelle auslesen
06.12.2018 09:52:11
Triola
Das Ausführen des Add-in/Makros wird vom Unternehmensadmin aus Sicherheitsgründen deaktiviert. :( Ich versuche es mal heute Abend @home am privaten PC. Vielen Dank schon mal
AW: Hashtags aus Zelle auslesen
06.12.2018 10:32:29
Triola
Habe es jetzt auf einem anderen Rechner installiert. Allerdings habe ich noch nie mit VBA und UDF gearbeitet und weiß nicht, was ich machen soll/ eingeben muss. Den Code in das Modul eingeben, ok. Und in dem 'XHTML Tabelle für Foren' die entsprechenden Tabellenbereiche auswählen ist auch logisch, aber danach passiert nichts. Gibt es für die Bedienung ein Tutorial?
Anzeige
AW: Hashtags aus Zelle auslesen
06.12.2018 10:48:40
hary
Moin
Wenn du den Code in ein Modul reingesetzt hast,
Funtioniert die Function wie eine Formel. Du findest diese dann unter:
Reiter Formel/Funktion einfügen/Kategorie auswählen/benutzerdefiniert
da steht dann: auslesen
So kannst du die Formel benutzen.
Das Addin 'XHTML Tabelle für Foren' brauchst du nicht. Es dient nur zur Darstellung einer Tabelle im Forum.
Hier mal eine Bsp.Mappe
https://www.herber.de/bbs/user/125931.xlsm
gruss hary
Anzeige
AW: Hashtags aus Zelle auslesen
06.12.2018 19:12:47
Triola
Sehr cool! 1000Dank, Hary!
;
Anzeige
Anzeige

Infobox / Tutorial

Hashtags aus Zelle auslesen in Excel

Schritt-für-Schritt-Anleitung

  1. Öffne Excel und erstelle eine neue Arbeitsmappe oder öffne eine bestehende.

  2. Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.

  3. Klicke auf Einfügen > Modul, um ein neues Modul zu erstellen.

  4. Füge den folgenden VBA-Code ein:

    Function auslesen(Zelle As Range) As String
   Dim a
   Dim i As Long, Ausgabe As String, Anzeige As String
   a = Split(Zelle, "#")
   For i = 1 To UBound(a)
       Anzeige = Left(a(i), InStr(1, a(i), " ") - 1)
       Ausgabe = IIf(Ausgabe = "", Anzeige, Ausgabe & ", " & Anzeige)
   Next
   If Ausgabe <> "" Then auslesen = Ausgabe
End Function

  5. Schließe den VBA-Editor und kehre zur Excel-Arbeitsmappe zurück.

  6. Verwende die Funktion in einer Zelle, indem du =auslesen(A1) eingibst, wobei A1 die Zelle ist, die den Text mit den Hashtags enthält.

Häufige Fehler und Lösungen

  • Fehler: "Funktionsaufruf gescheitert"

    • Lösung: Überprüfe, ob du den Code korrekt in ein Modul eingefügt hast. Stelle sicher, dass die Funktion ohne Fehler kompiliert.

  • Fehler: Keine Ausgabe

    • Lösung: Stelle sicher, dass die Zelle, die du analysierst, tatsächlich Hashtags enthält. Wenn keine Hashtags vorhanden sind, wird die Ausgabe leer sein.

  • Fehler: "Makros sind deaktiviert"

    • Lösung: Stelle sicher, dass Makros in deinen Excel-Optionen aktiviert sind. Du kannst dies unter Datei > Optionen > Trust Center > Einstellungen für das Trust Center überprüfen.

Alternative Methoden

Wenn du nicht mit VBA arbeiten möchtest, kannst du auch folgende Methoden nutzen:

  • Textfunktionen: Verwende die Excel-Funktion TEXTVERKETTEN (verfügbar in neueren Versionen), um Text zu kombinieren und eine manuelle Verarbeitung der Daten vorzunehmen.
  • Power Query: Importiere deine Daten in Power Query und filtere die Hashtags heraus, bevor du sie zurück nach Excel lädst.

Praktische Beispiele

Zelle A Erwartete Ausgabe
#Samsung rollt #android 6.0.1 #Marshmallow nun auch für das europäische Galaxy S5 aus. Samsung, android, Marshmallow
#Apple und #Google arbeiten an neuen Technologien. Apple, Google
Das ist kein Hashtag. (leer)

Verwende die Funktion =auslesen(A1) in Zelle B1, um die Hashtags aus Zelle A1 auszulesen.

Tipps für Profis

  • Hashtag-Tastenkombination: Du kannst die Eingabe von Hashtags in deinen Texten mithilfe von ALT + H + A (in der deutschen Version) beschleunigen.
  • Erweitere deine UDF: Du kannst die Funktion auslesen erweitern, um auch weitere Filterkriterien zu berücksichtigen, wie z.B. die Anzahl der Hashtags, die du zurückgeben möchtest.
  • Verwende Fehlerbehandlungsroutinen in deinem VBA-Code, um die Benutzerfreundlichkeit zu erhöhen und mögliche Fehlerquellen zu minimieren.

FAQ: Häufige Fragen

1. Kann ich die Funktion auch in Excel Online verwenden?
Nein, die VBA-Funktion auslesen funktioniert nur in der Desktop-Version von Excel, nicht in Excel Online.

2. Wie viele Hashtags kann ich maximal auslesen?
Die Funktion ist so konzipiert, dass sie alle Hashtags in der Zelle ausliest. Du kannst sie jedoch anpassen, um eine bestimmte Anzahl zurückzugeben.

3. Was ist, wenn ich keine VBA-Makros verwenden kann?
In diesem Fall kannst du die Textfunktionen oder Power Query verwenden, um die Hashtags manuell zu extrahieren.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige