{"id":4373,"date":"2017-07-28T05:21:14","date_gmt":"2017-07-27T20:21:14","guid":{"rendered":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/?p=4373"},"modified":"2017-07-28T05:21:14","modified_gmt":"2017-07-27T20:21:14","slug":"excel-vba-datetime","status":"publish","type":"post","link":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/2017\/07\/28\/excel-vba-datetime\/","title":{"rendered":"Excel\/VBA\uff1a\u65e5\u4ed8\u306e\u64cd\u4f5c"},"content":{"rendered":"

\u65e5\u4ed8\u95a2\u4fc2\u3063\u3066\u3088\u304f\u4f7f\u3046\u306e\u306b\u3059\u3050\u5fd8\u308c\u3066\u3057\u307e\u3046\u306e\u3067\u5fd8\u5099\u9332\u3068\u3057\u3066\u66f8\u304d\u7559\u3081\u3066\u304a\u304d\u307e\u3059\u3002\u4eca\u56de\u306fVBA\u7de8\u3067\u3059\u3002<\/p>\n

\u307e\u305a\u306f\u57fa\u672c\u5f62<\/h2>\n

Now()\u306f\u3088\u304f\u4f7f\u3044\u307e\u3059\u306d\u3002\u6642\u523b\u3092\u629c\u3044\u305f\u65e5\u4ed8\u306e\u307f\u306fDate\u3001\u6642\u523b\u306e\u307f\u306fTime()\u3068\u306a\u308a\u307e\u3059\u3002\u306a\u305c\u304bDate\u306e\u307f\u306f()\u304c\u3042\u308a\u307e\u305b\u3093\u3002\u4ed8\u3051\u3066\u3082\u81ea\u52d5\u3067\u6d88\u3048\u3066\u3057\u307e\u3044\u307e\u3059\u3002<\/p>\n

\r\nSub \u65e5\u4ed8\u57fa\u672c()\r\n  Range("A1") = Now()\r\n  Range("A2") = Date\r\n  Range("A3") = Time()\r\nEnd Sub\r\n \r\n<\/pre>\n
 <\/p>\n
\"\"<\/a><\/p>\n
[ad#top-1]<\/p>\n
\u65e5\u4ed8\u306e\u8db3\u7b97<\/h2>\n
\u65e5\u6570\u306e\u8db3\u3057\u7b97\u306f\u5358\u7d14\u306b\uff11\u3092\u8db3\u305b\u3070\u826f\u3044\u306e\u3067\u3059\u304c\u3001\uff11\u304b\u6708\u5f8c\u3084\uff11\u5e74\u5f8c\u306f\u5404\u6708\u306e\u65e5\u6570\u3084\u3046\u308b\u3046\u5e74\u306e\u6709\u7121\u3067\u8db3\u3059\u65e5\u6570\u304c\u4e0d\u660e\u78ba\u3067\u3059\u3002\u305d\u3093\u306a\u6642\u306fDateAdd\u304c\u4fbf\u5229\u3067\u3059\u3002\u4ee5\u4e0b\u306f\uff11\u5e74\u5f8c\u3092\u8a08\u7b97\u3057\u3066\u3044\u307e\u3059\u3002<\/p>\n
\r\nSub \u65e5\u4ed8\u306e\u8db3\u7b97()\r\n  dt = Now()\r\n  Range("A1") = dt\r\n  '1\u5e74\u5f8c\r\n  dt = DateAdd("yyyy", 1, dt)\r\n  Range("A2") = dt\r\nEnd Sub\r\n\r\n<\/pre>\n
 <\/p>\n
\"\"<\/a><\/p>\n
 <\/p>\n
\u6708\u672b\u306e\u65e5\u4ed8\u3092\u5f97\u308b<\/h2>\n
\u6708\u672b\u3092\u6c42\u3081\u308b\u306b\u306fDateSerial\u95a2\u6570\u3092\u4f7f\u3044\u307e\u3059\u3002\u3053\u308c\u306f\u304b\u306a\u308a\u4fbf\u5229\u3067\u3059\u3002<\/p>\n
\r\nSub \u6708\u672b\u8a08\u7b97()\r\n  dt = Now()\r\n  '\u4eca\u6708\u672b\r\n  Range("A1") = DateSerial(Year(dt), Month(dt) + 1, 0)\r\n  '\u524d\u6708\u672b\r\n  Range("A2") = DateSerial(Year(dt), Month(dt), 0)\r\n  '\u7fcc\u6708\u672b\r\n  Range("A3") = DateSerial(Year(dt), Month(dt) + 2, 0)\r\nEnd Sub\r\n \r\n<\/pre>\n
 <\/p>\n
\"\"<\/a><\/p>\n
 <\/p>\n
\u6587\u5b57\u5217\u304b\u3089\u65e5\u4ed8\u578b\u306b\u5909\u63db\u3059\u308b<\/h2>\n
\u65e5\u4ed8\u306e\u6587\u5b57\u5217\u304b\u3089\u65e5\u4ed8\u578b\u306b\u5909\u63db\u3059\u308b\u5834\u5408\u306fDateValue\u3092\u4f7f\u3044\u307e\u3059\u3002\u305f\u3060\u3001\u3053\u306e\u95a2\u6570\u306f\u5fae\u5999\u3067\u300c20170728\u300d\u3084\u300c170728\u300d\u3068\u3044\u3046\u6587\u5b57\u5217\u306f\u5909\u63db\u3067\u304d\u307e\u305b\u3093\u3002\u4ee5\u4e0b\u306e\u4f8b\u3067\u306f\uff14\u884c\u76ee\u3067\u30a8\u30e9\u30fc\u304c\u767a\u751f\u307e\u3059\u3002<\/p>\n
\r\nSub \u6587\u5b57\u5217\u304b\u3089\u65e5\u4ed8()\r\n  Range("A1") = DateValue("2017\/7\/28")\r\n  Range("A2") = DateValue("2017\u5e747\u670828\u65e5")\r\n  Range("A3") = DateValue("20170728") '\u30a8\u30e9\u30fc!!\r\nEnd Sub\r\n\r\n<\/pre>\n
 <\/p>\n
\u3053\u306e\u901a\u308a\u30a8\u30e9\u30fc\u767a\u751f\u3002\u300c20170728\u300d\u3068\u304b\u300c170728\u300d\u3068\u304b\u3063\u3066\u4e00\u756a\u4f7f\u308f\u308c\u308b\u306e\u3067\u3059\u304c\u3001\u3053\u308c\u304c\u4f7f\u3048\u305a\u6b8b\u5ff5\u3067\u3059\u3002<\/p>\n
\"\"<\/a><\/p>\n
 <\/p>\n
4\u884c\u76ee\u3092\u30b3\u30e1\u30f3\u30c8\u30a2\u30a6\u30c8\u3057\u3066\u5b9f\u884c\u3059\u308b\u3068\u4ee5\u4e0b\u306e\u901a\u308a\u3067\u3059\u3002<\/p>\n
\"\"<\/a><\/p>\n
 <\/p>\n
[ad#ad-1]<\/p>\n","protected":false},"excerpt":{"rendered":"
\u65e5\u4ed8\u95a2\u4fc2\u3063\u3066\u3088\u304f\u4f7f\u3046\u306e\u306b\u3059\u3050\u5fd8\u308c\u3066\u3057\u307e\u3046\u306e\u3067\u5fd8\u5099\u9332\u3068\u3057\u3066\u66f8\u304d\u7559\u3081\u3066\u304a\u304d\u307e\u3059\u3002\u4eca\u56de … <\/p>\n","protected":false},"author":1,"featured_media":4375,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[23,6],"tags":[],"class_list":["post-4373","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-excel","category-vba"],"aioseo_notices":[],"_links":{"self":[{"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/posts\/4373","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/comments?post=4373"}],"version-history":[{"count":4,"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/posts\/4373\/revisions"}],"predecessor-version":[{"id":4383,"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/posts\/4373\/revisions\/4383"}],"wp:featuredmedia":[{"embeddable":true,"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/media\/4375"}],"wp:attachment":[{"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/media?parent=4373"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/categories?post=4373"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/pineplanter.moo.jp\/non-it-salaryman\/wp-json\/wp\/v2\/tags?post=4373"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}