Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

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

VBA String Splitten ohne Delimiter

Frage Microsoft Microsoft Office

Mitglied: Xaero1982

Xaero1982 (Level 4) - Jetzt verbinden

22.01.2011 um 13:46 Uhr, 5451 Aufrufe, 5 Kommentare

Moin,

alle guten Dinge sind drei zu Access/VBA

Nun noch eine Sache:

Ich hab ein Datumsfeld, aber das Datum soll OHNE Punkte eingegeben werden können, zb. 200111

Das ist natürlich nicht Datumsfeldkonform, also möchte ich das Datum nach der Eingabe in ein Datumskonformes umwandeln.

Sprich, der String soll in 3 Teile geteilt werden:

20
01
11

Dazwischen sollen dann Punkte eingefügt werden und das wieder in das Datumsfeld geschrieben werden.

Jemand ne Idee wie ich das umsetzen kann?

Split scheint ja nur mit Delimittern zu arbeiten, aber ich hab da ja keine ...

VG und Thx
Mitglied: bastla
22.01.2011 um 14:02 Uhr
Hallo Xaero1982!

Abgesehen davon, dass es auch "Left()" und "Right()" gäbe, kommst Du ganz einfach mit "Mid()" durch ...

Grüße
bastla
Bitte warten ..
Mitglied: 76109
22.01.2011 um 14:03 Uhr
Hallo Xaero1982!

Meinst Du sowas:
01.
    MeinDatum = "200111" 
02.
     
03.
    Datum = DateSerial(Right(MeinDatum, 2), Mid(MeinDatum, 3, 2), Left(MeinDatum, 2)) 
04.
 
05.
    MsgBox Datum
Gruß Dieter

[edit] bastla war wieder 5 Sekunden schneller [/edit]
Bitte warten ..
Mitglied: bastla
22.01.2011 um 14:10 Uhr
@Dieter
[edit] bastla war wieder 5 Sekunden schneller;--) [/edit]
... aber nur, weil ich Xaero1982 auch noch Gelegenheit zu etwas eigener Leistung lassen wollte ...

BTW finde ich es sehr optimistisch, einfach davon auszugehen, dass Benutzer auch wirklich eingeben, was sie sollen ...

Grüße
bastla
Bitte warten ..
Mitglied: 76109
22.01.2011 um 14:18 Uhr
@bastla
Zitat von bastla:
BTW finde ich es sehr optimistisch, anzunehmen, dass Benutzer auch wirklich eingeben, was sie sollen ...
Sehe ich auch so, aber ich vermute mal, dass die Werte aus einer DB-Abfrage kommen (vorhergehender Beitrag)? Ansonsten empfinde ich es als aüßerst bedenklich

Gruß Dieter
Bitte warten ..
Mitglied: Xaero1982
23.01.2011 um 20:01 Uhr
Hi,

also ich hab nun eine andere Lösung gefunden über das Eingabeformat von Access.

01.
00" "00" "9999;0;_
Nun kann ich zwar nur noch Daten ohne . eingeben, aber immerhin im Format

ttmm
ttmmjj
ttmmjjjj

Wer Punkte eingeben will bekommt nen Fehler.

So genug zu dem Thema mit der DB - alle Bitten umgesetzt und getestet

VG und Thx!
Bitte warten ..
Ähnliche Inhalte
VB for Applications
VBA Grenzwerte in String prüfen Regex ??? Excel2010 (3)

Frage von Chillministrator zum Thema VB for Applications ...

ISDN & Analoganschlüsse
gelöst Splitter - RJ45 zu RJ11? (14)

Frage von Waishon zum Thema ISDN & Analoganschlüsse ...

Sonstige Systeme
gelöst Mit PDF Parser Content Splitter in Datenbank schreiben (1)

Frage von Zero01 zum Thema Sonstige Systeme ...

TK-Netze & Geräte
Was tun mit den "überflüssigen" Splittern nach der VOIP oder VDSL-Umstellung? (2)

Tipp von Lochkartenstanzer zum Thema TK-Netze & Geräte ...

Neue Wissensbeiträge
Windows Update

Novemberpatches und Nadeldrucker bereiten Kopfschmerzen

(14)

Tipp von MettGurke zum Thema Windows Update ...

Windows 10

Abhilfe für Abstürze von CDPUsersvc auf Win10 1607 und 2016 1607

(7)

Tipp von DerWoWusste zum Thema Windows 10 ...

RedHat, CentOS, Fedora

Fedora 27 ist verfügbar

Information von Frank zum Thema RedHat, CentOS, Fedora ...

Heiß diskutierte Inhalte
Windows Server
Kennwort vergessen bei Hyper vserver 2012r (12)

Frage von jensgebken zum Thema Windows Server ...

Linux Desktop
Bildschirmauflösung unter Linux festlegen (12)

Frage von itebob zum Thema Linux Desktop ...

Batch & Shell
Batch Programm verhalten bei shoutdown -p (11)

Frage von Michael-ITler zum Thema Batch & Shell ...

Windows Userverwaltung
gelöst Administrator hat alle Rechte verloren (10)

Frage von mrdead zum Thema Windows Userverwaltung ...