title image


Smiley Re: Leerzeichen aus Text entfernen per VBA
Hallo UweHmm.. Meissel selbst in die Hand nehmen und immer schön hämmern.GrussSilviaSub hdshs() TextAlt = "AB CD EF " TextNeu = Substitute(TextAlt, " ", "ß") MsgBox TextNeuEnd SubPublic Function Substitute(tStr, z1, z2) ofs = InStr(1, tStr, z1) While ofs > 0 tStr = Left(tStr, ofs - 1) & z2 & Right(tStr, Len(tStr) - ofs) ofs = InStr(ofs, tStr, z1) Wend Substitute = tStrEnd Function

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: