VBA Teil eines Zelleninhalts suchen und ausgeben.

26/03/2009 - 17:55 von Dennis Miller | Report spam
Hallo,

ich habe eine Tabelle in der in Spalte E z.B. folgender Text steht:

"Rundschreiben für Azubis #1030.pdf"

Nun wurde für Spalte F folgende Formel verwendet:

=TEIL(E50;(FINDEN("#";E50;1))+1;4) als Ergebnis wird somit ausgegeben:
1030.

Leider benötige ich nun diese Formel als VBA Befehl.

Kann mir jemand bitte weiterhelfen.

vielen Dank.
Gruß

Dennis
 

Lesen sie die antworten

#1 Andreas Killer
26/03/2009 - 18:00 | Warnen spam
Dennis Miller schrieb:

=TEIL(E50;(FINDEN("#";E50;1))+1;4) als Ergebnis wird somit ausgegeben:
1030.
Leider benötige ich nun diese Formel als VBA Befehl.


Sub Test()
Dim S As String
S = "Rundschreiben für Azubis #1030.pdf"
S = Mid(S, InStr(S, "#") + 1, 4)
End Sub

Ähnliche fragen