Najděte a odeberte řetězce - tipy pro Excel

Mike se ptá:

Existuje nějaký způsob, jak mohu jednoduše odstranit určité znaky z textového řetězce? Například mám poštovní směrovací číslo BN19 4GX a chci odstranit všechny číselné znaky, abych opustil BN GX.

To je jednodušší pomocí VBA.

Přejděte do editoru VB (Alt + F11), přejděte na Vložit, Modul. Vložte tento kód tam.

Function RemoveNumeric(Rng As String) As String Dim Tmp As String Dim i As Integer Tmp = Rng For i = 0 To 9 Tmp = Application.Substitute(Tmp, i, "") Next i RemoveNumeric = Tmp End Function

Nyní, zpět v aplikaci Excel, pokud je váš počáteční text v A1, vložte tento vzorec tam, kde chcete výsledek:

=RemoveNumeric(A1)

a dostanete 'BN GX'. Funkce odstraní všechny číselné znaky, tj. (0,1,2,3,4,5,6,7,8,9), ale lze ji upravit tak, aby nahradila něco jiného.

Poznámka

Výňatek z diskusní desky.com