Kode til sletning af de 3 sidste tegn i alle celler i kolonne A

for each cellA in colA
  cellA.value = left(cellA; (len(cellA)-3)
next

evt brug -4 i formlen, så forsvinder det sidste mellemrum også

Her er en formel du kan bruge hvis det ikke er VBA du skal/kan bruge:

=MIDT(A1;1;FIND(HØJRE(A1; 4);A1;1))

Og hvis initialerne ikke altid kun er på tre bogstaver kan du søge baglæns efter mellemrum:
Find(" ";[din celle];len([din celle)-len([din celle]-4)))

Ovenstående finder placeringen af dit mellemrum inden initialer (forudsat at de maksimalt er på tre bogstaver) i antal karakterer fra højre.

På den måde kan du sætte dette tal ind i de ovenstående forslag.

Takker :)