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

VBA - Teilstring suchen und Werte zuordnen

Forumthread: VBA - Teilstring suchen und Werte zuordnen

VBA - Teilstring suchen und Werte zuordnen
05.04.2013 16:00:20
Askman
Hallo,
würde mich über eure Hilfe freuen:
Habe diverses mit Formeln probiert, ist aber bei 10.000 Zeilen zu langsam.
Daher benötige ich ein Makro für: Teilstring (aus bestimmter Spalte) suchen in Gesamtwert(A2:A10000)und nebenstehende Zellen(von Teilstring) zuordnen.
siehe meine Tabelle:
https://www.herber.de/bbs/user/84740.xlsx
Danke für RüA.

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - Teilstring suchen und Werte zuordnen
05.04.2013 16:57:05
EtoPHG
Hallo,
Die Frage ist: Was hast du für Formeln ausprobiert, die zu langsam sind?
Ich hätte z.B. 

C2: =WENN(ISTFEHLER(VERGLEICH(LINKS(A2;FINDEN(" ";A2)-1);G:G;0));"";INDEX(H:H;(VERGLEICH(LINKS( _
A2;FINDEN(" ";A2)-1);G:G;0))))
D2: =WENN(C2="";"";INDEX(I:I;(VERGLEICH(LINKS(A2;FINDEN(" ";A2)-1);G:G;0))))

...aber leider keinen Bock, das für 10'000 Zeilen auszuprobieren.
Damit das Aufsplitten des Namens nicht nötig wird, zerlegst du Spalte A in 2 Spalten, dann wirds nochmal schneller. Vieles in XL hängt von einer 'gesunden' Datenstruktur ab!
In 99% aller Fälle sind Formeln um Faktoren schneller als VBA-Code!
Gruess Hansueli

Anzeige
AW: VBA - Teilstring suchen und Werte zuordnen
06.04.2013 12:56:38
Askman
Hallo,
vielen Dank für deine Bemühungen. Leider bekomme ich es nicht zum Funktionieren. Habe auch verschiedene Anpassungen versucht und Spalte A aufgeteilt (was ich eben nicht wollte).
Dennoch besten Dank!

AW: VBA - Teilstring suchen und Werte zuordnen
06.04.2013 16:28:40
fcs
Hallo AskMan,
in deiner Beispieldatei funktionieren die Formeln von Hansueli.
Du must natürlich das Zeichen "_" in dem Formeltext entfernen.
Wenn die Formel mit deinen Realdaten nicht funktioniert, dann sind u.a. folgende Ursachen möglich:
  • In den Zellen mit den zu suchenden Texten in Spalte G sind unsichtbare Zeichen enthalten (z.B Leerzeichen am Ende des Textes)

  • Deine Kurznamen in Spalte G sind Zahlen, dann funktioniert die Formel nicht. Es sind Anpassungen der Formeln erforderlich. Übersichtlicher wird es, wenn man den zu suchenden Begriff in einer separaten Spalte ermittelt.

    • Gruß
    Franz

    Anzeige
    AW: VBA - Teilstring suchen und Werte zuordnen
    06.04.2013 19:47:07
    Askman
    Hallo,
    funktioniert jetzt. Herzlichen Dank an beide. Habt mir sehr geholfen.
    Nach dem alten Motto, in der Formel zählt jedes Zeichen, habe ich den _ nicht entfernt. Hätte ich eigentlich selbst merken sollen.
    Bis zum nächsten Mal!
    ;

    Forumthreads zu verwandten Themen

    String in Zeilen suchen
    Herbert

    Hallo liebe Gemeinde
    Ich habe mir vor längerer Zeit von Euch helfen lassen, um in der Spalte A rückwärts nach Text zu suchen.
    In Spalte A kam bisher der jeweilige Name einer Abteilung (den suche ich) und laufende Nummern vor, klappt prima mit folgendem Code:
    Sub a_String() iRow =...
    28.10.2008 14:20:00
    Thread-ID: 1019944
    7 Beiträge
    Ordner in Explorer-Struktur suchen VBA
    andreas

    Hallo zusammen,
    habe ein Formular mit einem Button "Speichern" und unter anderem ein Feld "Angebotsnr."
    Wird der Button Speichern gedrückt soll das Programm den Ordner der im Feld Angebotsnr. eingetragen ist suchen. Dieser Ordner ist zum Zeitpunkt der Erstellung des Formulares im Window...
    11.11.2008 08:50:00
    Thread-ID: 1023400
    2 Beiträge
    Anzeige
    Leere Zelle suchen, Wert eintragen VBA
    andreas

    Hallo zusammen,
    habe ein kleines Formular mit zwei "Command-Button".
    Bei drücken von "Zufügen" soll die nächst leere Zelle im Bereich "F3:J3500" gesucht werden und ein "x" eingetragen werden.
    Bei drücken von "Entfernen" suche im selben Bereich die letzte ausgefüllte Zelle und diese...
    19.11.2008 11:57:07
    Thread-ID: 1025960
    2 Beiträge
    VBA-Code in einem String erzeugen und dann ausführ
    Dirk

    Hallo!
    Gibt es eine Möglichkeit, VBA-Code auszuführen, der in einer String-Variablen vorliegt, die zuvor dynamisch erzeugt wurde? Sprich: Ich möchte VBA-Code dynamisch erzeugen und anschließend ausführen. Geht das irgendwie?
    Ich hoffe, das ist so verständlich.
    Vielen Dank,
    Dirk<...
    20.01.2009 20:08:36
    Thread-ID: 1041981
    4 Beiträge
    VBA: Bestimmte Zeichenfolge in Zelle finden
    gega

    Hallo ich bins nochmals,
    ich finde einfach keine Möglichkeit zwei Teile aus dem String herauszulösen, da nur "Käufer: " und "[ Kontakt mit Käufer aufnehmen ]" fest am Anfang und Ende des Strings sind und der Käufername hier "leu_bw_cen" unterschiedlich lang ist und auch die EMail-Adr. zw. d...
    23.01.2009 11:52:00
    Thread-ID: 1042917
    3 Beiträge
    Wert suchen, eintragen, weitersuchen (VBA)
    Nico

    Moin
    Nachdem ich Gestern mein Problem mit einem Sverweis über mehrere Zellen lösen wollte (Danke nochmal an Josef Ehrensberger) habe ich heute feststellen dürfen, dass es zwar funktioniert - aber die Verzögerung auf Grund der Masse an Daten doch zu hoch ist.
    Hier also mein Problem zieml...
    26.02.2009 09:19:15
    Thread-ID: 1054225
    11 Beiträge
    VBA Wert suchen, Wert einfügen
    andreas

    Hallo zusammen,
    wie muss ich den Code schreiben, suche nach Zeilen in denen die Zelle "B" nicht leer ist.
    In der Zeile in der die Zelle "B" nicht leer ist soll dann in Zelle "P" der Wert "1" eingetragen werden.
    Danke für die Hilfe
    Andreas
    09.03.2009 08:27:39
    Thread-ID: 1057988
    8 Beiträge
    suchen kopieren einfügen vba
    Bea

    Hallo zusammen
    Ich hab folgendes Problem.
    in der angehängten Beispielmappe möchte ich, das die in Arbeitsblatt "Nummern" hinterlegten Anfänge von Telefonnummern in Arbeitsblatt "evnachweis" gesucht die jeweiligen Zeilen kopiert und dann in Arbeitsblatt in dem Fall "Februar" (am besten...
    10.03.2009 11:55:49
    Thread-ID: 1058557
    9 Beiträge
    Anzeige
    In Spalte nach Wert suchen VBA
    andreas


    Hallo zusammen,
    ich habe hier eine Tabelle, da will ich nach jeder Änderung in der Tabelle in Spalte "F" nach Wert "Spritzgießen" suchen und bei den gefundenen Zeilen die Zellen "B-N" rot einfärben und mit Rahmen versehen.
    Komme aber wegen Mangels VBA-Erfahrung nicht klar damit.
    03.04.2009 13:05:41
    Thread-ID: 1066652
    5 Beiträge
    Teilstring "was " in Zelle suchen
    Werner

    VBA-Level: befriedigend
    Hallo Freunde,
    innerhalb einer Spalte sollen diejenigen Zellen markiert werden, die den Teilstring "was " (einschliesslich der Leerstelle) enthalten, aber nicht,
    wenn "was " direkt auf "et" oder direkt auf "nd" folgt. Sinn ist, zwar den Teilstring "was " zu s...
    06.04.2009 11:30:35
    Thread-ID: 1067067
    6 Beiträge
    VBA-Code für "Suchen in: Formeln"
    Wolfango

    Hallo Experten,
    ich habe folgenden VBA-Code:
    Sub nach_DokNr_suchen() Columns("A:A").Select Application.Dialogs(xlDialogFormulaFind).Show End Sub
    Leider habe ich von VBA keine Ahnung!!!
    Wie muss ich diesen Code ergänzen bzw. erweitern, dass im erscheinenden "Suchen-Dialogfeld...
    20.04.2009 14:58:48
    Thread-ID: 1069849
    5 Beiträge
    Anzeige
    VBA Suchen/Ersetzen inkl. Anzahl der Ersetzungen
    Randolf

    Hallo Excel-Gemeinde,
    ich habe folgende Aufgabenstellung? Mit der normalen Suchen & Ersetzen-Funktion wird im Anschluss die Anzahl der Ersetzungen mitgeteilt. So weit so gut. Ich habe jetzt das Makro aufgezeichnet und es normal ablaufen lassen. Aber es kommt keine Anzahl der Ersetzungen...
    14.05.2009 11:54:34
    Thread-ID: 1075089
    7 Beiträge
    Anzeige

    Beliebteste Forumthreads (12 Monate)

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