{"id":3479,"date":"2015-08-17T06:36:03","date_gmt":"2015-08-17T04:36:03","guid":{"rendered":"http:\/\/www.ramses.de\/?p=3479"},"modified":"2015-08-17T06:36:03","modified_gmt":"2015-08-17T04:36:03","slug":"faq-access-zeitangaben-auf-volle-15-minuten-runden","status":"publish","type":"post","link":"https:\/\/www.ramses.de\/?p=3479","title":{"rendered":"FAQ Access &#8211; Zeitangaben auf volle 15 Minuten runden"},"content":{"rendered":"<div>\n<h1>Access VBA &#8211; Zeitangaben auf volle 15 Minuten runden<\/h1>\n<\/div>\n<h2><strong>Problem <\/strong><\/h2>\n<p>Beim der Eingabe von krummen Zeiten wie 9:07 Uhr soll auf volle 15 Minuten gerundet werden?<\/p>\n<h2><strong>L\u00f6sung <\/strong><\/h2>\n<p>Geben Sie in einem globalen Modul zun\u00e4chst die folgende Funktion ein:<\/p>\n<pre>Function ZeitRunden(varZeit, varRundenAuf) As Date\r\nDim hh As Integer, nn As Integer\r\nDim strZeit As String\r\nstrZeit = Format$(varZeit, \"hh:nn\")\r\nhh = Val(Left$(strZeit, 2))\r\nnn = Val(Mid$(strZeit, 4, 2))\r\nZeitRunden = Format(TimeSerial( _\r\nhh, _\r\nInt(nn \/ varRundenAuf + 0.5) _\r\n* varRundenAuf, _\r\n0), \"hh:nn\")\r\nEnd Function<\/pre>\n<p>Die Einstellung f\u00fcr Ihr Feld &#8222;Startzeit&#8220; \u00e4ndern Sie dann auf folgenden Ausdruck:<\/p>\n<p>=ZeitRunden(Jetzt();15)<br \/>\n=ZeitRunden(Jetzt();10) -&gt; 00, 10, 20, 30, 40, 50<br \/>\n=ZeitRunden(Jetzt();30) -&gt; 00, 30<\/p>\n","protected":false},"excerpt":{"rendered":"<p>Access VBA &#8211; Zeitangaben auf volle 15 Minuten runden Problem Beim der Eingabe von krummen Zeiten wie 9:07 Uhr soll auf volle 15 Minuten gerundet &#8230; <a title=\"FAQ Access &#8211; Zeitangaben auf volle 15 Minuten runden\" class=\"read-more\" href=\"https:\/\/www.ramses.de\/?p=3479\" aria-label=\"Mehr Informationen \u00fcber FAQ Access &#8211; Zeitangaben auf volle 15 Minuten runden\">Weiterlesen &#8230;<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[47,43],"tags":[58,61],"class_list":["post-3479","post","type-post","status-publish","format-standard","hentry","category-access","category-faq","tag-access-2010","tag-vba"],"_links":{"self":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/3479","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=3479"}],"version-history":[{"count":1,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/3479\/revisions"}],"predecessor-version":[{"id":3480,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/3479\/revisions\/3480"}],"wp:attachment":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=3479"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=3479"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=3479"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}