Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
vbShortDate als Recordset in Datumsfeld eintragen
zurück: Datei öffnen mit ShellExecute weiter: Shell(cmd) Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Gast



Verfasst am:
25. Apr 2014, 13:23
Rufname:

vbShortDate als Recordset in Datumsfeld eintragen - vbShortDate als Recordset in Datumsfeld eintragen

Nach oben
       Version: Office 2010

Hallo Zusammen,
ich bekomme es nicht hin das datum welches im vba generiert wird in die Tabelle im kurzformat einzutragen. kann mir jemand helfen?
Code:
Sub test2()
    Dim rst As DAO.Recordset
    Dim krit As String
    Dim testdatum As Date
   
    testdatum = Now() - 7
    krit = "[Analysedatum] = " & CDbl(DateValue(testdatum))
    Set rst = CurrentDb.OpenRecordset("tblAuswertungen", dbOpenDynaset)
    rst.FindFirst krit
    If rst.NoMatch Then
        With rst
            .AddNew
            .Fields("Analysedatum") = testdatum
            .Fields("Werk") = "w1"
            .Update
            .Close
        End With
      Else
        MsgBox "Dieses Datum ist bereits importiert, zahlen bitte in die " _
             & "Datenbank eintragen!", , "Information"
    End If
End Sub
vielen dank im vorraus
MissPh!
Office-VBA-Programmiererin


Verfasst am:
25. Apr 2014, 13:37
Rufname:
Wohnort: NRW

AW: vbShortDate als Recordset in Datumsfeld eintragen - AW: vbShortDate als Recordset in Datumsfeld eintragen

Nach oben
       Version: Office 2010

Hallo,

warum nimmst du nicht einfach Date() anstelle von Now()?

_________________
Gruß MissPh!
Gast



Verfasst am:
25. Apr 2014, 13:47
Rufname:

AW: vbShortDate als Recordset in Datumsfeld eintragen - AW: vbShortDate als Recordset in Datumsfeld eintragen

Nach oben
       Version: Office 2010

Embarassed Embarassed Laughing Laughing

Danke für die schnelle antwort. Hat wunderbar funktioniert
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Wenn Feld leer, vorderen Wert eintragen 6 Chrischiable 793 24. Nov 2010, 15:47
Chrischiable Wenn Feld leer, vorderen Wert eintragen
Keine neuen Beiträge Access Tabellen & Abfragen: Datumsfeld aktualisieren mittels SQL Aufruf in VBA 6 BernhardS 1091 10. Nov 2010, 14:08
BernhardS Datumsfeld aktualisieren mittels SQL Aufruf in VBA
Keine neuen Beiträge Access Tabellen & Abfragen: Uhrzeit im Datumsfeld abschneiden 2 Catsche 1810 15. Okt 2010, 10:18
Gast Uhrzeit im Datumsfeld abschneiden
Keine neuen Beiträge Access Tabellen & Abfragen: Datensatz manuell eintragen geht nicht ! 0 basti606 198 15. Jun 2010, 14:14
basti606 Datensatz manuell eintragen geht nicht !
Keine neuen Beiträge Access Tabellen & Abfragen: Datumsfeld ändern 1 Twix22 280 22. Sep 2008, 10:03
KlausMz Datumsfeld ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Kriterien der Abfrage über Formular eintragen? 7 dteq 596 13. Jul 2008, 16:40
Marmeladenglas Kriterien der Abfrage über Formular eintragen?
Keine neuen Beiträge Access Tabellen & Abfragen: Datumsfeld+xMonate 4 Bernd62 397 23. Jun 2008, 15:18
Bernd62 Datumsfeld+xMonate
Keine neuen Beiträge Access Tabellen & Abfragen: "Parameterwerte eintragen" NERVT 3 DeAndrea 400 09. Jun 2008, 22:14
Willi Wipp "Parameterwerte eintragen" NERVT
Keine neuen Beiträge Access Tabellen & Abfragen: 3 Jahre zu einem Datumsfeld hinzufügen 2 Hundhausen 392 11. Nov 2007, 12:09
Hundhausen 3 Jahre zu einem Datumsfeld hinzufügen
Keine neuen Beiträge Access Tabellen & Abfragen: Parameterabfrage nach Jahreszahl bei Datumsfeld 8 Co1m-Co1tus 3010 22. Aug 2007, 13:20
Co1m-Co1tus Parameterabfrage nach Jahreszahl bei Datumsfeld
Keine neuen Beiträge Access Tabellen & Abfragen: Probleme beim Recordset - Parameterübergabe bei Abfrage 5 Forkl 879 08. Aug 2007, 14:00
Forkl Probleme beim Recordset - Parameterübergabe bei Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Automat.Eintragen von Werten geknüpft an Bedingungen 3 heuschrecke 498 01. Feb 2007, 23:34
Willi Wipp Automat.Eintragen von Werten geknüpft an Bedingungen
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel Tricks