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

Matrixformel in VBA

Forumthread: Matrixformel in VBA

Matrixformel in VBA
15.09.2015 19:59:23
Horst
Hallo,
ich habe Probleme meine Matrixformel in VBA darzustellen.
Ich versuche eine Funktion zu schreiben, der ich ein Array und einen Suchtext übergebe. Diese Soll dann die Nummer der ersten Zelle liefern, in der der Suchtext gefunden wurde.
In Excel klappt die Formel hier einwandfrei:
{=MIN(WENN(ISTFEHLER(SUCHEN(E4;Namensliste!$A$1:$A$942;1));1000;ZEILE(Namensliste!$A$1:$A$942)))}
Wie müsste eine entsprechende VBA-Funktion aussehen?
Vielen Dank

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Matrixformel in VBA
15.09.2015 20:02:59
Hajo_Zi
=MIN(IF(ISERROR(SEARCH(A13,Namensliste!$A$1:$A$942,1)),1000,ROW(Namensliste!$A$1:$A$942)))

AW: Matrixformel in VBA
16.09.2015 11:46:11
Horst
Danke für deine Hilfe. Ich habe nun die Funktion gebastelt aber ich bekomme es nicht hin, dass der in der Formel übergebene Bereich richtig erkannt wird und in SEARCH() verwendet werden kann.
Kann mier jemand sagen was ich hier anpassen muss?
Function Treffer(Suchtext As String, ByVal Sucharray As Variant, Treffernummer As Integer)
letzte_Zeile = Cells(Rows.Count, 1).End(xlUp).Row
Suchwort = """" & Suchtext & """"
Zeile = Evaluate("MIN(IF(ISERROR(SEARCH(" & Suchwort & "," & Sucharray & ",1))," &  _
letzte_Zeile + 1 & "," & Sucharray & "))")
If Zeile = letzte_Zeile Then
Treffer = ""
Exit Function
End If
Treffer = Zeile
End Function

Anzeige

Forumthreads zu verwandten Themen

Bestimmten bereich aus einem String per VBA separieren
marspoki2
Hallo Profis,

ich habe mal eine Kurze Frage.

Ich möchte gerne aus einem String (Beispiel siehe unten) bestimmte Daten extrahieren. (Die Tabelle kommt mit ganz vielen Städten in diesem Format.)

ort-typ="Dorf" ort-name="Winterstein" webseite="https://www.waltershausen.de/un...
04.05.2024 11:44:33
Thread-ID: 1976596
8 Beiträge
Überlauffehler 6
bustue
Moin Moin Freunde,

bei folgendem VBA Code erhalte ich die Fehlermeldung Überlauf.
Ich muß mehr als 65536 Zeilen exportieren.
Der Code stammt von Ramses und funktioniert bisher tadellos.

Sub save5_as_CSV_Click() '(C) by Ramses 'Exportiert einen ausgewählten Bereich...
09.05.2023 10:57:23
Thread-ID: 1930319
8 Beiträge
HEUR/Macro.Excel2000
P.Ockert

Hallo ihr,
ich wende mich an euch da ich einfach nicht weiter weiß. Ich habe ein großes Programm geschrieben mit einigen Funktionen. Hab das Programm versioniert aufgebaut. Als ich dann von der Version 11 auf Version 12 kleine Änderungen gemacht habe, kam bei der Version 12 auf einmal bei A...
03.05.2011 10:36:37
Thread-ID: 1212740
5 Beiträge
Nach Wiederholung volle Funktion
Lukas

Hallo Liebe VBA Community,
da Ich als Praktikant derzeit ein Makro erstellen muss welches Dateien so berarbeitet dass bestimmte Daten aus einem Excel file gezogen werden, komme ich zu meiner Frage.
Das Makro welches ich nutzen will befindet sich unten angehaengt. Jedoch wird mir sobald...
10.07.2017 09:46:17
Thread-ID: 1568257
6 Beiträge
Summe-Funktion mit VBA
Daniel

Hallo,
eigentlich geht es darum, Funktionen, die man in EXCEL nicht findet, selber einzubinden. So habe ich zum Beispeil eine UND Funktion benötigt. Mein Ergebnis ist nun dieses Makro:
- Aufgerufen wird die Funktion mit =LogicAND(B1:C6)
Public Function LogicAND(Rin As Range) As I...
26.07.2005 13:09:15
Thread-ID: 642435
3 Beiträge
Summe-Funktion mit VBA
Daniel

Hallo,
eigentlich geht es darum, Funktionen, die man in EXCEL nicht findet, selber einzubinden. So habe ich zum Beispeil eine UND Funktion benötigt. Mein Ergebnis ist nun dieses Makro:
- Aufgerufen wird die Funktion mit =LogicAND(B1:C6)
Public Function LogicAND(Rin As Range) As I...
26.07.2005 13:09:29
Thread-ID: 642436
1 Beitrag
ALLE Klammern färben, funktioniert, aber...
da.ricci

Hallo VBA-ler,
in Anlehnung an einen Beitrag aus Herbers Excel-Forumsarchiv aus dem 2011 Jahr:
Text zwischen eckiger Klammer grün einfärben
habe ich versucht ALLE Klammern() inkl. Inhalt in einer Zelle zu "highlighten".
Was mir auch nach unzähligen "Macro-Einzelschritten" gelan...
11.07.2015 05:14:29
Thread-ID: 1435781
11 Beiträge
Verschiebung von Zelleninhalten bei best. Namen
Zelleninhalten

Hallo liebe Community,
ich möchte folgende Aufgabestellung mit eurer Hilfe in VBA als Macro lösen:
Ich habe ein .txt Dokument, das via Marcro in Excel mit der Funktion "Text in Spalten" eingelesen wird.
In einer Spalte werden die Werte, die mit "XE" beginnen, vermeintlich fehlerhaft...
10.01.2016 19:16:39
Thread-ID: 1468026
4 Beiträge
@michax Kursabfrage
Zwenn

Hallo michax,
ich hoffe Du findest diesen Thread, da Deiner im Archiv versunken ist:
https://www.herber.de/forum/cgi-bin/callthread.pl?index=1788456
Dein Trick mit dem setzen des Datums über das hidden input field funktioniert nicht mehr. Man muss jetzt wirklich einigen Aufwand bet...
27.10.2020 00:47:18
Thread-ID: 1789511
1 Beitrag
3 Filter in Listbox einbauen
Andy

Hallo alle zusammen,
mein VBA ist wirklich bescheiden. Ich arbeite schon seit Wochen an dieser Datei und habe viele Codeschnipsel zusammengebaut - danke an dieser Stelle auch an all diejenigen, die mir schon geholfen haben.
Es stellt sich jetzt folgendes Problem. Ich habe ein Userform e...
18.01.2018 09:36:12
Thread-ID: 1602944
2 Beiträge
Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum