String Helper für VBA – 19 Funktionen für Text in MS Access

Zeichenketten sind überall – beim Import, Reporting und in der Textverarbeitung. Statt ständig Substring, Trim und Replace zu jonglieren, bekommst du hier einen Werkzeugkasten mit 19 VBA-String-Funktionen: schnell, elegant und fehlerfrei, direkt über eine Testformular-Oberfläche ausprobierbar.

Wer mit VBA arbeitet, kennt es: Zeichenketten sind überall – beim Import, beim Reporting, bei der Datenaufbereitung und Textverarbeitung. Und jedes Mal heißt es: Substring hier, Trim da, Replace dort. Damit ist jetzt Schluss: ein Werkzeugkasten mit 19 String-Funktionen, schnell, elegant und fehlerfrei.

Was ist besonders?

Jede Funktion ist direkt über eine integrierte Formularoberfläche testbar. Du siehst sofort das Ergebnis, prüfst eigene Eingaben und kombinierst Funktionen beliebig – maximale Flexibilität, weniger Debugging.

Abbildung 1: Das Testformular mit allen Funktionen.

Alle 19 Funktionen im Ăśberblick

Funktion Beschreibung Beispiel
StringFixLength Feste Länge – zu lang wird abgeschnitten, zu kurz aufgefüllt. StringFixLength("ABC", 6, "_") → "ABC___"
StringCombine Verbindet Strings mit frei wählbarem Trennzeichen. StringCombine("Vorname", "Nachname", " ") → "Vorname Nachname"
StringRemoveTrailingChars Entfernt Zeichen am Ende eines Textes. StringRemoveTrailingChars("Test, ", ", ") → "Test"
StringRemoveChars Löscht bestimmte Zeichen im gesamten String. StringRemoveChars("12-34-56", "-") → "123456"
StringRemoveWords Entfernt gezielt Wörter aus einem Text. StringRemoveWords("Das ist ein Testtext", "Testtext") → "Das ist ein"
StringExtractBetween Extrahiert Text zwischen zwei Markern. StringExtractBetween("Hallo [Welt]!", "[", "]") → "Welt"
StringCount Zählt Buchstaben, Zahlen, Sonderzeichen oder Wörter. StringCount("ABC 123", "letters") → 3
StringCapitalizeWords Wandelt jeden Wortanfang in Großbuchstaben um. StringCapitalizeWords("max mustermann") → "Max Mustermann"
StringCountSubstring Zählt, wie oft ein Teilstring vorkommt. StringCountSubstring("banana", "na") → 2
StringIsNumeric Prüft, ob ein String eine gültige Zahl ist. StringIsNumeric("-12,5") → True
StringContainsAny Sucht nach beliebigen Begriffen. StringContainsAny("Das ist toll", Array("toll", "super")) → True
StringIsEmpty Erkennt leere, null oder nur mit Leerzeichen gefüllte Strings. StringIsEmpty(" ") → True
StringExtractEmails Findet alle E-Mail-Adressen im Text. StringExtractEmails("Kontakt: test@mail.com oder info@firma.de") → Array("test@mail.com", "info@firma.de")
StringClean Bereinigt überflüssige Leer- und Steuerzeichen. StringClean(" Hallo Welt ") → "Hallo Welt"
StringRepeat Wiederholt einen Text beliebig oft. StringRepeat("-", 10) → "----------"
StringPadNumber Füllt Zahlen mit führenden Zeichen auf. StringPadNumber(42, 5, "0") → "00042"
StringWrap Bricht lange Texte auf eine Zeilenlänge um. StringWrap("Dies ist ein sehr langer Text", 10)
StringToInitials Erzeugt Initialen aus Namen oder Begriffen. StringToInitials("Max Mustermann") → "MM"
StringMaskSensitive Verdeckt sensible Textteile. StringMaskSensitive("Kreditkarte1234", 4) → "********1234"

Einsatz & Integration

Alle Funktionen sind kommentiert, validieren ihre Eingaben und lassen sich direkt in bestehende Projekte einfügen. Für den Produktiveinsatz brauchst du nur das Modul modHelper_String – alles andere dient nur zum Testen und Präsentieren. Kein Setup, kein Add-In.

Fazit

Mit diesen 19 Developer Helpers wird dein Umgang mit Strings schneller, sauberer und deutlich effizienter: weniger Code, weniger Fehler, mehr Produktivität. Die ausführliche Beschreibung findest du wie gewohnt gut dokumentiert direkt im Code.

Download

Ein VBA-Werkzeugkasten für MS Access mit 19 String-Funktionen (StringFixLength, StringClean, StringExtractEmails, StringMaskSensitive u. v. m.) – kommentiert, validiert und über ein Testformular direkt ausprobierbar.

âś• Newsletter

Newsletter