Office: (Office 2010) Excel VBA Code: Ersetzen von Zeichen nach einer bestimmten Anzahl

Hallo,

ich habe eine Excel-Liste, die auf der Spalte F mit unterschiedlichen IDs befüllt ist. Die Länge der IDs ist auch unterschiedlich. Ich möchte nun folgendes per VBA Code tun:
Ich möchte dass die IDs quasi "maskiert" werden. D.h. die mittleren Zeichen sollen durch ein "x" ersetzt werden. Dabei sollen nur die ersten 6 und letzten 4 Zeichen bleiben und die mittleten restlichen Zeichen durch soviele "x" ersetzt werden, wie die Zeichen die maskiert werden.

Beispiel:
Ist:
ID231230034593405
ID233499530249988009
ID23003566356112289

Soll:
ID2312xxxxxxx3405
ID2334xxxxxxxxxx8009
ID2300xxxxxxxxx2289

Falls etwas unverständlich ist, bitte fragen.

Danke im Voraus, viele Grüße.
Kyriakos

 

Ich habs mal ohne VBA gemacht.

 

Hallo Michael und danke für deine Antwort. Genau das wollte ich vermeiden xD. Eine Datenbank zu haben. Ich brauche das als VBA Code, denn das wird Bestandteil eines größeren VBA Scripts bestehend aus mehreren Makros und das soll zwischendurch gemacht werden. Mit der Formel, brauche ich ja eine separate Matrix aufführen (Hilfstabelle Anzahl x) und das ist was ich eben vermeiden möchte. Freundliche Grüße

 

Hab übrigens eine Formel gefunden: =WIEDERHOLEN. Das ist das was ich gesucht hab und in VBA habe ich eine Lösung gefunden mit Left, String und Right.