Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1072to1076
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1072to1076
1072to1076
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Volltextsuche mit Rückgabewerten mit VBA?

Volltextsuche mit Rückgabewerten mit VBA?
18.05.2009 09:49:21
Horst
Hey !
Wie bekomme per VBA eine Volltext-Suche hin und wie kann ich die Ergebnismenge z.B. in einem Array ablegen?
Ich habe versucht das per Markodekoder heraus zu finden, aber die erstellte Prozedur wir ohne weiteren VBA Code abgelegt.
Kann ich mir diese Ergebnis-Menge auch nach einem Suchen ersten Aufruf zurückgeben lassen?
Gruß
Horst

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

Betreff
Datum
Anwender
Anzeige
Sortier mal deinen Fragetext! Kaum verständl! orT
18.05.2009 10:14:25
Luc:-?
Moin! Luc :-?
Volltextsuche mit Rückgabewerten in VBA
18.05.2009 10:39:14
Horst
Hey !
Ich möchte ein Tabellenblatt nach einem Text durchsuchen
- Bearbeiten -Suchen -Alle suchen
Wenn mehrere Zellen gefunden werden bekomme ich im Suchfenster eine Ergebnismenge aufgelistet.
unterteilt in:
Mappe Blatt Name Zelle Wert Formel
Diese suche möchte ich gerne einem Makro ablegen und mir die Ergebnismenge merken... um dann im nächsten Schritt alle gefunden Zellen z.B. Rot zu Umrahmen.
Meine Frage Wie erreiche ich das per VBA?
Ich habe versucht mir die Funktionalität mit dem Makrodekoder aufzuzeichnen, dochh die erstellte Procedure blieb ohne weiteren VBA-Code.
Besser erklärt?
Gruß
Horst
Anzeige
AW: Suchergebnisse sammeln - Makro
18.05.2009 18:59:19
Daniel
Hi
das ist ne aufgabenstellung, die sich schwer mit dem Recorder aufzeichnen lässt,
daher hier ein Makro, in dem alle Suchergebnisse (Zelle), in einer Range-Variable gesammelt werden, die du dann weiterverwenden kannst.

Sub AlleSuchen()
Dim rngSuchErgebnisGesamt As Range
Dim rngSuchErgebnisEinzel As Range
Dim Suchtext As String
Dim sh As Worksheet
Suchtext = "a"
Set sh = ActiveSheet
Set rngSuchErgebnisEinzel = sh.Cells.Find(what:=Suchtext, lookat:=xlPart, LookIn:=xlValues)
If rngSuchErgebnisEinzel Is Nothing Then
MsgBox "Der Suchbegriff konnte nicht gefunden werden"
Else
Set rngSuchErgebnisGesamt = rngSuchErgebnisEinzel
Do
Set rngSuchErgebnisEinzel = sh.Cells.FindNext(after:=rngSuchErgebnisEinzel)
If Intersect(rngSuchErgebnisEinzel, rngSuchErgebnisGesamt) Is Nothing Then
Set rngSuchErgebnisGesamt = Union(rngSuchErgebnisEinzel, rngSuchErgebnisGesamt)
Else
Exit Do
End If
Loop
rngSuchErgebnisGesamt.Interior.ColorIndex = 3
End If
End Sub


Gruß, Daniel

Anzeige
AW: Suchergebnisse sammeln - Makro
19.05.2009 07:24:24
Horst
Hey Daniel,
genau so etwas habe ich gesucht, DANKE !!
Horst

304 Forumthreads zu ähnlichen Themen

Summwenn mit mehreren Arbeitsblaettern/Kriterien
Alex

Hallo @ all
Ich habe mal wieder ein Problem:
Ich habe die Arbeitsblaetter 1-31 und moechte von dort jeweils die Werte aus den Zellen G2:G32 summieren wenn Die Zellen A und B jeweils eine entsprechende Bedingung erfuellen.
Bisher arbeitete ich nur mit einer Bedingung in den Zellen de...
12.08.2008 13:20:00
Thread-ID: 1001177
4 Beiträge
Anzeige
SVerweis mit 2 Kriterien über Index??
Bernd

Hallo Freaks,
ich habe es wirklich versucht....und auch ein einfaches Bsp. aufgebaut. Nur die Indexformel funktioniert nicht...
Ich bitte Euch um Hilfe.
https://www.herber.de/bbs/user/56079.xls
Danke, Bernd
17.10.2008 15:26:00
Thread-ID: 1017185
4 Beiträge
Liste mit 2 Kriterien sortieren...
Uwe

Guten Abend an Alle,
brauche mal Hilfe bei der sortierung einer liste.
In F1 soll der beste Spieler aus der Liste angezeigt werden, der die kürzeste Zeit benötigt hat, und dabei am wenigsten Fehler gemacht hat.
...wie kann man sowas machen.
Mit der Funktion Rang und KKleinste ha...
19.10.2008 20:47:00
Thread-ID: 1017528
7 Beiträge
Anzeige
Suchen mit vorgegebener Spaltenüberschrift
Bernd

Hallo,
wie kann ich einer Formel wie z.B. ZÄHLENWENN(Test!M:M;"bestimmter Text"), wo ja die M-Spalte durchsucht wird, M:M durch eine fest vorgebene Spaltenüberschrift (steht immer in der 1. Zeile), so dass die Formel bei Verschiebung von Spalten nicht in der falschen Spalte M sucht?
Vie...
21.11.2008 09:33:00
Thread-ID: 1026630
4 Beiträge
Werte in einer Spalte(5zeilig) suchen und löschen!
adrian

Hi,
kann mir jemand erklären warum das nicht funzt funktioniert?
liegt es daran, dass ich "SpalteR" als range deklariert habe, anstatt als string?
nur wie durchsuche ich dann den "string"?
Möchte nur folgendes:
Falls Werte in der Spalte (Bereich von nur 5 zeilen) sind, lösch...
24.11.2008 12:04:00
Thread-ID: 1027253
5 Beiträge
Suchen in Matrix nach 2 Werten mit einer Funktion
Heix

Hallo zusammen, habe gerade die Gesamt-CD von Herrn Herber erhalten und habe nun auch schon die erste Frage:
Ich möchte in einer Zelle den Wert aus einer Matrix übernehmen lassen und zwar wie folgt:
Matrix:
Lampe Brutto Netto
-------- -------- -------
EGES.....24.......18
28.11.2008 11:24:00
Thread-ID: 1028631
5 Beiträge
Suche in Text mit mehreren Suchkriterien
Christian

Hallo Forum,
ich möchte prüfen, ob ein Text mindestens einen Text aus einer Liste enthält.
Bsp: enthält der Text
"das ist die Liste der gelieferten Früchte: Apfel, Birnen"
einen der Texte enthält:
"Banane", "Kirsche", "Birnen"
in dem Fall ja. Ich brauche keine Position...
14.01.2009 11:32:00
Thread-ID: 1039544
10 Beiträge
Suchen mit 3 Kriterien
Schmidt

Hallo zusammen
Ich habe eine Tabelle , in der ich mit 3 Suchkriterien einen Wert errechnen möchte.
Mit Sverweis und der WENN-Funktion konnte ich das Problem nicht lösen. Könnte mir bitte jemand hilfreich zur Seite stehen.
https://www.herber.de/bbs/user/58658.xls
21.01.2009 14:41:00
Thread-ID: 1042200
7 Beiträge

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
1
3
6
2
3
4
4
9
6
2
1
3
9
4
4
3
2
6
8
7
3
7
4
1