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

gelöst Zahl aus Text filtern (in einer Abfrage)

Mitglied: moeller67

moeller67 (Level 1) - Jetzt verbinden

11.09.2008, aktualisiert 12.09.2008, 16919 Aufrufe, 2 Kommentare

Ich möchte in einer Abfrage in Access aus einem Feld, das Zahlen und ein paar Buchstaben beinhaltet (z.B. "F 17" oder "894 K" oder "CK 77"),
jeweils nur die Zahl herausfischen (also z.B. 17 oder 894 oder 77). Hat jemand dafür eine Lösung???
Mitglied: bastla
11.09.2008 um 17:49 Uhr
Hallo moeller67!

Du könntest dafür eine benutzerdefinierte Funktion verwenden. Der folgende VBA-Code filtert zB aus dem übergebenen Wert alle Ziffern heraus (auch, wenn dazwischen andere Zeichen vorkommen):
01.
Function LeseZahl(Eingabe) 
02.
Dim L As String, Zahl As String, Zeichen As String, i As Integer 
03.
L = Len(Eingabe) 
04.
Zahl = "" 
05.
For i = 1 To L 
06.
    Zeichen = Mid(Eingabe, i, 1) 
07.
    If Zeichen >= "0" And Zeichen <= "9" Then Zahl = Zahl & Zeichen 
08.
Next 
09.
LeseZahl = Zahl 
10.
End Function
Um die Funktion "LeseZahl()" verwenden zu können, zunächst im Datenbankfenster über "Module / Neu" ein Modul erstellen und den Code in dieses Modul kopieren. Beim Speichern das Modul mit einem pssenden Namen versehen, etwa "Funktionen".

In einer Abfrage kannst Du dann folgendes berechnete Feld verwenden:
01.
Zahl: LeseZahl([EinFeld])
bzw als SQL-Statement
01.
SELECT LeseZahl([EinFeld]) AS Zahl FROM EineTabelle;
Wurde keine einzige Ziffer gefunden, ist das Ergebnis ein leerer String "".

Grüße
bastla
Bitte warten ..
Mitglied: moeller67
12.09.2008 um 08:54 Uhr
Hat super geklappt. Vielen Dank. Gruß Stephan Möller
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
Text in Zahlen umwandeln
Tipp von logischeMicrosoft Office

Beim Import von Daten aus anderen Anwendungen kommt es häufig vor, dass Zahlen als Textwerte in der Excel-Tabelle erscheinen. ...

Windows 7

Text filtern, mit Hilfe einer Batch Datei ?

Frage von meisterluehrsWindows 713 Kommentare

Hallo, ich bräuchte mal die Hilfe von ein paar "Experten" :D, die sich mit den Batch-Dateien, bzw der CMD ...

Microsoft Office

Excel VBA Zahl von Text trennen

gelöst Frage von abuelitoMicrosoft Office28 Kommentare

Hallo an Alle, ich habe folgendes Problem: In der Spalte A habe ich in den Zellen folgende Werte stehen: ...

Datenbanken

Fehler bei SQL Abfrage - Filter Funktion

gelöst Frage von mschaedler1982Datenbanken2 Kommentare

Hallo zusammen, Wir haben hier eine SQL Abfrage erstellt (funktioniert soweit auch alles) nur wenn wir das ganze als ...

Neue Wissensbeiträge
Windows 10

USB Maus und Tastatur versagen Dienst unter Windows 10

Erfahrungsbericht von hardykopff vor 1 TagWindows 105 Kommentare

Da steht man ziemlich dumm da, wenn der PC sich wegen fehlender USB Tastatur und Maus nicht bedienen lässt. ...

Administrator.de Feedback
Update der Seite: Alles zentriert
Information von Frank vor 1 TagAdministrator.de Feedback18 Kommentare

Hallo User, die größte Änderung von Release 5.8 ist das Zentrieren der Webseite (auf großen Bildschirmen) und ein "Welcome"-Teaser ...

Humor (lol)

WhatsApp-Nachrichten endlich auch per Bluetooth versendbar

Information von BassFishFox vor 2 TagenHumor (lol)4 Kommentare

Genau darauf habe ich gewartet! ;-) Der beliebte Messaging-Dienst WhatsApp erhält eine praktische neue Funktion: Ab dem nächsten Update ...

Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 3 TagenGoogle Android3 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Heiß diskutierte Inhalte
Windows Server
Standortvernetzung zu einem Strato VServer (Windows)
Frage von matzefratze81Windows Server10 Kommentare

Moin, ich komme aus einem Enterprise-Umfeld und habe den Fehler gemacht, dass ich mich auf ein kleines Unternehmen eingelassen ...

Grafikkarten & Monitore
4k EIZO Monitor, Fernseher und Splitter
Frage von LerxxeyGrafikkarten & Monitore9 Kommentare

Hallo Zusammen, vielleicht könnt ihr mir bei einem Problem helfen wo ich einfach nicht mehr weiterkomme Und zwar haben ...

TK-Netze & Geräte
Fax im Betrieb
Frage von gansa28TK-Netze & Geräte6 Kommentare

Hallo zusammen, Endlich wurden meine Gebete Erhört und der Rechner meines Bekannten dem ich etwas unter die Arme greife, ...

Humor (lol)
Nerd Zeitschrift gesucht
Frage von 2SeitenHumor (lol)6 Kommentare

Hey Zusammen, Ich suche eine Zeitschrift bei der es ums technische Basteln geht. Pc zusammenschrauben, Arduino Projekte, Server Tipps ...