Clever-Excel-Forum

Seiten: 1 2

Hallo ws-53,

Danke, dass du PQ noch ins Spiel bringst. Nachfolgend noch eine Variante mit REGEX (auch mehrere):

Code:
Function F_snb(c00)

  sn = Split(Replace(Replace(c00, ".", " "), ":", " "))

  For j = 2 To UBound(sn)

    sp = Array(Val(sn(j)), StrReverse(Val(StrReverse(sn(j)))))

    If Len(sp(0)) = 5 Or Len(sp(1)) = 5 Then Exit For

  Next

  F_snb = IIf(Len(sp(0)) = 5, sp(0), --sp(1))

End Function

In B2:

PHP-Code:
=F_snb(A2) 

(25.03.2024, 17:09)snb schrieb: [ -> ]In B2:

PHP-Code:
=F_snb(A2)

Seiten: 1 2

Case

snb

Case