Herbers Excel-Forum - das Archiv

Funktion, wo einstellen ?

Bild

Betrifft: Funktion, wo einstellen ?
von: Günter

Geschrieben am: 15.03.2005 20:53:27
Guten Abend!
Ich habe von Frank folgende Funktion bekommen:
(Frage: Wo soll ich die Funktion bei VBA einstellen bzw. reinkopieren ?
Gruss
Günter
Public
Function GetText(strText As String, strKuerzel As String) As String
Dim intPos1 As Integer
Dim intPos2 As Integer
GetText = ""
If Len(strText & "") = 0 Then Exit Function
If Len(strKuerzel & "") = 0 Then
GetText = "#Kuerzel fehlt#"
Exit Function
End If
If Right(strKuerzel, 1) <> "=" Then strKuerzel = strKuerzel & "="
intPos1 = InStr(1, strText, strKuerzel, vbTextCompare)
If intPos1 = 0 Then
GetText = "#Kuerzel nicht gefunden#"
Exit Function
Else
intPos2 = InStr(intPos1 + 3, strText, "=", vbTextCompare)
If intPos2 > 0 Then
GetText = Trim(Mid(strText, intPos1 + 3, intPos2 - intPos1 - 5))
Else
GetText = Trim(Mid(strText, intPos1 + 3))
End If
End If
End Function


In der Tabelle gibst Du dann =PERSONL.XLS!GetText(J1;"st") ein, wobei Du den Namen an Deine Arbeitsmappe anpassen musst!
Bild

Betrifft: AW: Funktion, wo einstellen ?
von: Hajo_Zi

Geschrieben am: 15.03.2005 20:58:11
Hallo Günter,
In die Datei Personl.Xls in einem Modul. Die Datei befindet sch im Ordner XlStart.

Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.


Bild

Betrifft: AW: Funktion, wo einstellen ?
von: Günter
Geschrieben am: 15.03.2005 21:02:53
Danke Hajo!
Dachte, die Funktion muss speziell behandelt werden.
Dank und Gruß
Günter
Bild

Betrifft: AW: Funktion, wo einstellen ?
von: Luc :-?

Geschrieben am: 15.03.2005 21:36:16
Hallo Hajo & Günter,
ich stelle meine UDF (benutzerdefin.Fkt) im Modul einer leeren als AddIn (.xla) gekennzeichneten Mappe stets da ein, wo auch MS das mit seinen AddIns (z.B. EuroConvert) tut - im Ordner Makro unter Ordner Office. Word-Makros dann analog unter Ordner Macros.
Gruß Luc :-?
Bild

Betrifft: AW: Funktion, wo einstellen ?
von: Hajo_Zi
Geschrieben am: 15.03.2005 21:39:21
Hallo Luc,
ich habe mich nur an den Beitrag von Günter gehalten. Dort Stand was von Persol.xls.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.
Bild

Betrifft: ...Sicher, war auch nur ein Tip! -- owT
von: Luc :-?
Geschrieben am: 15.03.2005 21:57:11
 Bild
Excel-Beispiele zum Thema "Funktion, wo einstellen ?"
Einstellen des Drucker-Papiereinzug-Schachts