Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Frage Entwicklung VB for Applications

GELÖST

Access VBA Leerzeichen in Tabelle entfernen

Mitglied: e2Mario

e2Mario (Level 1) - Jetzt verbinden

05.10.2009 um 11:28 Uhr, 11066 Aufrufe, 2 Kommentare

Hallo zusammen,

kann mir jedmand bei nachstehendem "Problem" helfen.

Ich habe eine Access Tabelle (tmp_juhu) in der im Feld (Bezeichnung) am Ende des Textes unzählige Leerzeichen angehängt sind.
Hierzu habe ich mir folgenden Code organisiert

Public Function TrimExtended(ByVal strReplace As Variant)
Dim i As Integer
If IsNull(strReplace) Then Exit Function
strReplace = Trim(strReplace)
i = InStr(1, strReplace, Space(2))
While i > 0
strReplace = Left(strReplace, i - 1) & Mid(strReplace, i + 1)
i = InStr(1, strReplace, Space(2))
Wend
TrimExtended = strReplace
End Function

Wie kann ich nun den Code auf die Tabelle [tmp_juhu].[Bezeichnung] anwenden?
mit
TrimExtended ([tmp_juhu].[Bezeichnung])
funitoniert es leider nicht...


DANKE FÜR EURE HILFE! - sorry bin VBA Anfänger
Mitglied: Biber
05.10.2009 um 12:59 Uhr
Moin e2Mario,

die frustrierende Nachricht vorweg - diese Funktion liefern die Redmonder schon standardmäßig mit aus bei jedem Access seit Version 2.0

Bedeutet, Du kannst auch ohne selbst geschriebene Funktion die trailing blanks bei CHAR(n)-Feldern "abschneiden".

In einem SQL-Statement wäre die Syntax:
01.
 SELECT RTrim( tj.Bezeichnung) as Bezeichnung from tmp_juhuu tj
In diesem Klicki-Bunti-Krams, das sich "Abfrage-Entwurf" oder "Entwurfsansicht" glaubt nennen zu dürfen heißt es statt "RTrim( feld)" übersetzt ins Unterschleißheimerische dann "RGlätten(feld)".

Deine eigene Funktion kannst Du aber genauso verwenden---> setze statt "Trim(bezeichnung)" dann eben "TrimExtented(bezeichnung) " ein.

Wenn die Daten in der tmp_juhuu-Tabelle "Dir gehören", d.h. es kein weiterverarbeitendes Programm gibt, das diese Bezeichnung als CHAR(n)-Feld in fester Länger benötigt, dann ändere es EINMAL in Deiner Tabelle statt in jeder Query.

Also einmalig ein "UPDATE tmp_juhuu Set Bezeichnung = RTrim(bezeichnung)" und aus ist es mit dem täglichen Eindampfen.

Grüße
Biber
Bitte warten ..
Mitglied: e2Mario
05.10.2009 um 13:18 Uhr
Super danke dir - Frage gelöst!!!!

.... so einfach kann es sein, wenn man´s weis
Bitte warten ..
Ähnliche Inhalte
VB for Applications
VBA Access: Synchronisation zwischen Recordset und Access Tabelle
Frage von qwertz1VB for Applications2 Kommentare

Hallo, Ich habe in Access ein VBA-Skript programmiert. Das Skript holt sich Daten von einer MySQL Server. Das geht ...

Batch & Shell
BAT - Leerzeichen in Variable entfernen
gelöst Frage von hoffi3dBatch & Shell5 Kommentare

Ich mal wieder. Ich lese gerade einige Dateien aus einem Verzeichniss aus und schreibe diese in eine Variable, das ...

Batch & Shell
Leerzeichen aus Dateinamen entfernen
gelöst Frage von noob-xBatch & Shell3 Kommentare

Hallo Profis, ich möchte bei vielen Dateien in einem Ordner die Leerzeichen aus den Dateinamen entfernen Dateien sehen so ...

Batch & Shell
Leerzeichen per Batch entfernen vor der Weiterbearbeitung
gelöst Frage von daHartlBatch & Shell3 Kommentare

Hallo zusammen, gibt es eine Möglichkeit, per Batch alle Leerzeichen in einem Dateinamen durch "-" zu ersetzten? Das Leerzeichen ...

Neue Wissensbeiträge
Linux

Meltdown und Spectre: Linux Update

Information von Frank vor 1 TagLinux

Meltdown (Variante 3 des Prozessorfehlers) Der Kernel 4.14.13 mit den Page-Table-Isolation-Code (PTI) ist nun für Fedora freigegeben worden. Er ...

Tipps & Tricks

Solutio Charly Updater Fehlermeldung: Das Abgleichen der Dateien in -Pfad- mit dem Datenobject ist fehlgeschlagen

Tipp von StefanKittel vor 2 TagenTipps & Tricks

Hallo, hier einmal als Tipp für alle unter Euch die mit der Zahnarztabrechnungssoftware Charly von Solutio zu tun haben. ...

Sicherheit

Meltdown und Spectre: Wir brauchen eine "Abwrackprämie", die die CPU-Hersteller bezahlen

Information von Frank vor 2 TagenSicherheit12 Kommentare

Zum aktuellen Thema Meltdown und Spectre: Ich wünsche mir von den CPU-Herstellern wie Intel, AMD oder ARM eine Art ...

Sicherheit

Meltdown und Spectre: Realitätscheck

Information von Frank vor 2 TagenSicherheit10 Kommentare

Die unangenehme Realität Der Prozessorfehler mit seinen Varianten Meltdown und Spectre ist seit Juni 2017 bekannt. Trotzdem sind immer ...

Heiß diskutierte Inhalte
Batch & Shell
Meltdown Microsoft Prüf Script - .zip Datei leider leer
gelöst Frage von MasterBlaster88Batch & Shell13 Kommentare

Hallo zusammen, ich patche gerade unsere Windows Server bzgl. der Meltdown Lücke. Patch vorhanden, Reg Keys gesetzt Um das ...

Batch & Shell
Shell-Skript - Syntax error: Unterminated quoted string
Frage von newit1Batch & Shell13 Kommentare

Hallo Ich schreibe ein Skript das eine CSV-Datei in eine mySQL Datenbank schieben soll. Bekomme nach start des Skrips ...

E-Mail
Erfahrungen mit hMailServer gesucht
Frage von it-fraggleE-Mail10 Kommentare

Hallo, meine neue Stelle möchte einen eigenen Mailserver. Ich als Linuxkind war direkt geistig mit Postfix dabei. Leider wollen ...

Entwicklung
VBS: alle PDF-Dateien in einem Ordner gleichzeitig öffnen
gelöst Frage von JuweeeEntwicklung9 Kommentare

Hallo, ich habe in deiner Ordnerstruktur (.\Tagesberichte\xx.18\) mehrere dynamische PDF-Formulare (mit LCD erstellt). Die Berichtsformulare sind im Layout alle ...