Moin Moin,
wie kann ich per VBA aus einem Feldinhalt Leerzeichen entfernen? Z.B: aus „EN-UB 500“ müsste „EN-UB500“ werden!? Es geht darum das
ich aus zwei verschieden MDB’s die Daten
auswerten muss. (wurden vor meiner Zeit angelegt)
Gruß
Pädda
Hi Pädda,
vielleicht hilt Dir ja diese kleine Funktion weiter:
Function EntfLeerz(s As String) As String
Dim t As String, i As Integer
t = ""
For i = 1 To Len(s)
If Mid(s, i, 1) " " Then t = t + Mid(s, i, 1)
Next
EntfLeerz = t
End Function
Kannst Du z. B. bei einer Aktualisierungsabfrage wie dieser hier verwenden:
update Artikeltabelle set Artikelnummer=EntfLeerz(Artikelnummmer)
Peace
Lala
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]