Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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)

Frage Microsoft Microsoft Office

Mitglied: moeller67

moeller67 (Level 1) - Jetzt verbinden

11.09.2008, aktualisiert 12.09.2008, 16379 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
Datenbanken
gelöst Access 2010 Filter zurücksetzen (6)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Datenbanken
gelöst SQL-Abfrage - Anzahl der Wechsel zählen (15)

Frage von Cire48 zum Thema Datenbanken ...

JavaScript
Skript schlägt fehl - nur Zahlen werden gespeichert (3)

Frage von Ah3n0bar6us zum Thema JavaScript ...

Neue Wissensbeiträge
Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(2)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Windows 10

Windows 10: Erste Anmeldung Animation deaktivieren

(3)

Anleitung von alemanne21 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Netzwerkprotokolle
gelöst Leiten "dumme" Switches VLAN-Tags mit durch? (26)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

Netzwerkgrundlagen
Kann auf Freigabe nicht Zugreifen (16)

Frage von leon123 zum Thema Netzwerkgrundlagen ...

Windows Server
gelöst Neues KB für W10 1607 und W2K16 wieder mal nicht im WSUS 3.0, hat das noch jemand? (16)

Frage von departure69 zum Thema Windows Server ...

Router & Routing
FTTH bzw FTTB Router (13)

Frage von ukulele-7 zum Thema Router & Routing ...