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

VBA String Splitten ohne Delimiter

Frage Microsoft Microsoft Office

Mitglied: Xaero1982

Xaero1982 (Level 3) - Jetzt verbinden

22.01.2011 um 13:46 Uhr, 5396 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 ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Datenbanken
Access 2010 - Filter für Datum funkioniert nicht VBA (4)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Outlook & Mail
gelöst Outlook vba Email Anhang in Ordner speichern (3)

Frage von Daywalkercxp zum Thema Outlook & Mail ...

VB for Applications
VBA Excel Dateien zusammenfassen (3)

Frage von cberndt zum Thema VB for Applications ...

Microsoft Office
gelöst Excel 2007 Transponieren von Gruppen oder Blöcken mit VBA (7)

Frage von Chrissy123 zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Switche und Hubs
LAG zwischen Cisco SG300 und Dlink DGS1100 herstellen - wie? (14)

Frage von White-Rabbit2 zum Thema Switche und Hubs ...

Hardware
Lenovo Yoga 500 über angeschlossene USB Tastatur booten (13)

Frage von thomasreischer zum Thema Hardware ...

CPU, RAM, Mainboards
Hardware Fragen (12)

Frage von xaver-2 zum Thema CPU, RAM, Mainboards ...

Viren und Trojaner
Wie werde ich den Mist "fanli90" wieder los? (12)

Frage von Taumel zum Thema Viren und Trojaner ...