leestekens uit een cel verwijderen.

[Jelmei]

Hallo,

Ik zoek een mogelijkheid op leestekens( / - [ { # ) e.d. uit een excel cel te halen waarna alleen de tekst in letters overblijft.

Bestaat er zo iets ???

Alvast bedankt,
Patrick

 

[Wigi]

Hoi

Hier is een nieuwe functie:

Function GeenLeestekens(ByVal s As String) As String
    
    'strips "prohibited" characters from s
    'so as to leave a string that can be used as a valid sheet name
    
    Dim sTemp As String
    Dim arrProhib As Variant
    Dim i As Long
   
    sTemp = s
    
    'all "prohibited" characters
    arrProhib = Array("/", "-", "[", "{", "#")
    
    'take away all unwanted characters
    For i = LBound(arrProhib) To UBound(arrProhib)
        sTemp = Replace(sTemp, arrProhib(i), "")
    Next
    
    GeenLeestekens = sTemp
   
End Function

Je kan dan in bestand het volgende doen:

=GeenLeestekens(A1)

of

=GeenLeestekens("tekst met leestekens zoals # of {")

Als je wil, ken je de array arrProhib zelf aanpassen.

Wigi

 

[Jelmei]

:thumb:Wigi,

Fantastisch. Het was inderdad de bedoeling om een geldige sheetname te creeren.
Het werkt!!

Hartelijk bedankt,

Patrick