Projekt-Anfragen: Tel: 07022/9319004 info@CodeDocu.de Software Entwicklung in C# WPF Asp.Net Core Vba Excel Word SQL-Server EF Linq, UWP Net
#

Vba: Sonderzeichen austauschen korrigieren

 

Eine kleine Funktion für vba (Office Excel Word Outlook PowerPoint) zum verhindern, dass Sonderzeichen in Texten vorkommen.

Ansonsten kann man oft Dateinamen nicht speichern oder bei HTML Sonderzeichen nicht verwenden

 

 

 

 

 

Option Explicit

 

 

 

Public Function Sonderzeichen_entfernen(ByVal sText As String) As String

    '----------< Sonderzeichen_entfernen() >--------------

    sText = Replace(sText, "/", " ")    '*frontslash entfernen

    sText = Replace(sText, "\", " ")    '*Korrektur

    sText = Replace(sText, ":", " ")    '*Korrektur

    sText = Replace(sText, ".", " ")    '*Korrektur

    sText = Replace(sText, ",", " ")    '*Korrektur

    sText = Replace(sText, ";", " ")    '*Korrektur

    sText = Replace(sText, "*", " ")    '*Korrektur

    sText = Replace(sText, "?", " ")    '*Korrektur

    sText = Replace(sText, "{", " ")    '*Korrektur

    sText = Replace(sText, "}", " ")    '*Korrektur

    sText = Replace(sText, "[", " ")    '*Korrektur

    sText = Replace(sText, "]", " ")    '*Korrektur

    sText = Replace(sText, "$", " ")    '*Korrektur

    sText = Replace(sText, """", " ")    '*Korrektur

    sText = Replace(sText, "'", " ")    '*Korrektur

    sText = Replace(sText, "!", " ")    '*Korrektur

    sText = Replace(sText, "°", " ")    '*Korrektur

    sText = Replace(sText, "*", " ")    '*Korrektur

    sText = Replace(sText, "#", " ")    '*Korrektur

    sText = Replace(sText, "~", " ")    '*Korrektur

    sText = Replace(sText, "=", " ")    '*Korrektur

    sText = Replace(sText, ">", " ")    '*Korrektur

    sText = Replace(sText, "<", " ")    '*Korrektur

    sText = Replace(sText, "|", " ")    '*Korrektur

   

    '< Ausgabe >

    Sonderzeichen_entfernen = sText

    '</ Ausgabe >

    '----------< Sonderzeichen_entfernen() >--------------

End Function

 

Mobile
»
Excel Datei mit Schutz mit erlaubtem Farbformatierungen, Kommentaren und Sperren von Formelfeldern
»
Excel vba Fehler: Laufzeitfehler 1004 Die Locked-Eigenschaft des Range-Objektes kann nicht festgelegt werden
»
Excel Datei schützen
»
Excel Blatt schützen: Protect Parameter
»
Excel vba : Alle Worksheets auflisten
»
Vba: Sonderzeichen austauschen korrigieren
»
Gelöst: Excel vba copy paste values 100e Fehler
»
Excel vba: eine Liste automatisch per makro aktualisieren
»
Excel: Prüfen ob ein Worksheet vorhanden ist
»
Excel Code: in Powerpoint Grafiken oder Bereiche einfügen

.

Jobs, Projekte, Angebote für Freiberufler, Selbstständig an Info@CodeDocu.de