Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
248to252
248to252
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Eigene Funktion

Forumthread: Eigene Funktion

Eigene Funktion
02.05.2003 11:29:08
Rick
Guten Morgen
Ich muß täglich in meinen Exceltabellen den SVERWEIS anwenden. Nun ist die Formel recht lang( #NV unterdrückung ) und umfangreich einzugeben . Kann ich mir jetzt eine eigene Funktion machen so das ich Suchkriterium, Matrix und Spaltenindex nur einmal eingeben muß. Wenn ja wie ???

Beispielformel =WENN(ISTFEHLER(SVERWEIS(A1;B1:C20;2;FALSCH));"nicht in matrix";SVERWEIS(A1;B1:C20;2;FALSCH))

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Eigene Funktion
02.05.2003 11:55:32
Michael Scheffler

Hi,

VB-Editor, Modul einfügen, Function schreiben (wichtig in erste Zeile der Function Appication.Volatile)

Fertig!

Gruß

Micha

Hier ein Ansatz...
02.05.2003 11:56:22
Andreas Walter


Function EigeneDiv(Feld1, Feld2)

If Feld2 = 0 Then
EigeneDiv = "fehler"
Else
EigeneDiv = Feld1 / Feld2
End If

End Function

um #DIV/0? zu vermeiden

Man schreibt in einer Zelle z.B. =EigeneDiv(A1;A2)

Anzeige
Re: Eigene Funktion
02.05.2003 12:38:15
Rick

Danke habe das probiert sieht dann bei mir so aus, sicher falsch (logischerweise sonst würde es funktionieren)

Appication.Volatile
Function eigeneFunktion(suchkr, matrix, spalte)

eigeneFunktion = WENN(ISTFEHLER(SVERWEIS((suchkr);(matrix);(spalte);FALSCH));"fehler";SVERWEIS((suchkr);(matrix);(spalte);Falsch))
End Function

Also vielleicht kann du mir da noch etwas helfen

Anzeige
Re: Eigene Funktion
02.05.2003 14:06:09
Michael Scheffler

Function eigeneFunktion(varSuch As Variant, rngMatrix As Range, intSpalte As Integer)
Appication.Volatile

'Hier muss irgendeine Application.WorksheetFunction stehen
Cells(1, 1) = Application.WorksheetFunction.VLookup(varSuch, rngMatrix, intSpalte, False)
End Function


Re: Eigene Funktion
02.05.2003 15:03:39
rick

hab mir dann wohl zu einfach vorgestellt !! Vielen Dank! so geht es !

Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige