Interpunctie

[radar]

Ik krijg gegevens aangeleverd in excelformat met allerlei personalia, waaronder de voorletters.
Omdat aan de voorkant geen invoerwijze wordt afgedwongen, moet ik een vertaalslag maken naar uniforme schrijfwijze.
Het veld voorletters bevat gegevens deels met hoofdletters, deels met kleine leeters, soms met interpunctie soms zonder interpunctie.
Gewenst resultaat is allemaal hoofdletters en punten tussen de letters op ander tabblad.

Iemand een suggestie hoe dit te bewerkstelligen.

 

[wampier]

Afhankelijk van hoe je het resultaat wil hebben kan dat met een macro om alles in 1 keer te doen, of met een eigengemaakte functie als je die sporadisch wil toepassen en de locatie aan wil passen e.d.

eigen functie voorbeeld:

Function interpunctie(invoer As String) As String
    
    invoer = Trim(UCase(Join(Split(invoer, "."), "")))
    For i = 1 To Len(invoer)
        uitvoer = uitvoer & (Mid(invoer, i, 1) & ".")
    Next i
    
    interpunctie = uitvoer
    
End Function

 

[Cobbe]

Kom je hier verder mee?

 

[radar]

Even uit de lucht geweest; ga hier straks mee aan de slag !
Alvast dank; doet dat wat ik graag wilde; nu even puzzelen hoe ik dit in mijn sheet verwerk.

 

[radar]

Weggezet in mijn bestand en het doet dat wat ik graag wil.
Nogmaals dank !