{"id":1114,"date":"2012-05-10T13:12:41","date_gmt":"2012-05-10T04:12:41","guid":{"rendered":"http:\/\/www23.atpages.jp\/~inoni\/?p=1114"},"modified":"2017-10-20T17:29:05","modified_gmt":"2017-10-20T08:29:05","slug":"excel%e3%83%9e%e3%82%af%e3%83%ad%e8%a6%9a%e6%9b%b8-happymonday%e7%ae%97%e5%87%ba","status":"publish","type":"post","link":"http:\/\/anada.cloudfree.jp\/?p=1114","title":{"rendered":"Excel\u30de\u30af\u30ed\u899a\u66f8 HappyMonday\u7b97\u51fa"},"content":{"rendered":"<p>\u4f11\u65e5\u3092\u81ea\u52d5\u7684\u306b\u4f5c\u6210\u3059\u308b\u30de\u30af\u30ed\u3092\u4f5c\u6210\u4e2d\u3001\u30cf\u30c3\u30d4\u30fc\u30de\u30f3\u30c7\u30fc\u3063\u3066\u3069\u3046\u3084\u3063\u3066\u6c42\u3081\u308b\u306e\u304b\u3092\u8003\u3048\u305f\u3002<\/p>\n<p>\u8272\u3005\u30b5\u30a4\u30c8\u3092\u898b\u305f\u306e\u3060\u3051\u308c\u3069\u3001\u300c\u7d50\u5c40\u3069\u3046\u3084\u3063\u3066\u3084\u308b\u306e\u3088\uff01\u300d\u3068\u304b\u3001\u300c\u306a\u3093\u3067\u3053\u3093\u306a\u306b\u3053\u306d\u304f\u308a\u56de\u3057\u3066\u308b\u306e\u3088\uff01\u300d\u3068\u304b\u3001\u307e\u3041\u3068\u306b\u304b\u304f\u3042\u3093\u307e\u308a\u53c2\u8003\u306b\u306a\u308a\u305d\u3046\u306a\u30ed\u30b8\u30c3\u30af\u304c\u304d\u308c\u3044\u306b\u63d0\u793a\u3055\u308c\u3066\u3044\u308b\u30b5\u30a4\u30c8\u304c\u306a\u304b\u3063\u305f\u306e\u3067\u81ea\u5206\u3067\u4f5c\u3063\u305f\u3002<\/p>\n<p>\u5f15\u6570\u306b\u3001\u5e74\u3001\u6708\u3001\u9031\u3092\u8a2d\u5b9a\u3059\u308b\u3068\u3001Date\u578b\u306e\u65e5\u4ed8\u304c\u8fd4\u308b\u4ed5\u7d44\u307f<\/p>\n<p><strong><span style=\"color: #0000ff;\">Private Function GetMondayDateFromYearMonthWeek(ByVal y As Integer, ByVal m As Integer, ByVal w As Integer) As Date<\/span><\/strong><\/p>\n<p><strong><span style=\"color: #0000ff;\">Dim t As Date<\/span><\/strong><\/p>\n<p><strong><span style=\"color: #0000ff;\">t = DateSerial(y, m, 1)<\/span><\/strong><br \/>\n<strong><span style=\"color: #0000ff;\"> t = DateAdd(&#8220;d&#8221;, (8 &#8211; Weekday(t, vbMonday)) Mod 7, t) &#8216;1\u9031\u76ee\u306e\u6708\u66dc\u65e5<\/span><\/strong><br \/>\n<strong><span style=\"color: #0000ff;\"> GetMondayDateFromYearMonthWeek = DateAdd(&#8220;d&#8221;, 7 * (w &#8211; 1), t)<\/span><\/strong><\/p>\n<p><strong><span style=\"color: #0000ff;\">End Function<\/span><\/strong><\/p>\n<p>\u4f8b\u3048\u3070\u3001GetMondayDateFromYearMonthWeek(2012,9,3)\u3000\u3068\u3059\u308b\u3068\u3001\u623b\u308a\u5024\u306f2012\/9\/17\u3068\u306a\u308b\u3002<\/p>\n<p>\u305f\u3076\u3093\u3046\u307e\u304f\u3044\u304f\u3068\u601d\u3046\u3051\u3069\u30012012\u5e74\u3067\u3057\u304b\u8a66\u3057\u3066\u306a\u3044\u30fb\u30fb\u30fb<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u4f11\u65e5\u3092\u81ea\u52d5\u7684\u306b\u4f5c\u6210\u3059\u308b\u30de\u30af\u30ed\u3092\u4f5c\u6210\u4e2d\u3001\u30cf\u30c3\u30d4\u30fc\u30de\u30f3\u30c7\u30fc\u3063\u3066\u3069\u3046\u3084\u3063\u3066\u6c42\u3081\u308b\u306e\u304b\u3092\u8003\u3048\u305f\u3002 \u8272\u3005\u30b5\u30a4\u30c8\u3092\u898b\u305f\u306e\u3060\u3051\u308c\u3069\u3001\u300c\u7d50\u5c40\u3069\u3046\u3084\u3063\u3066\u3084\u308b\u306e\u3088\uff01\u300d\u3068\u304b\u3001\u300c\u306a\u3093\u3067\u3053\u3093\u306a\u306b\u3053\u306d\u304f\u308a\u56de\u3057\u3066\u308b\u306e\u3088\uff01\u300d\u3068\u304b\u3001\u307e\u3041\u3068\u306b\u304b\u304f\u3042\u3093\u307e\u308a\u53c2 [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[5],"tags":[43,74,80],"class_list":["post-1114","post","type-post","status-publish","format-standard","hentry","category-excelvba","tag-excel","tag-vba","tag-weekday"],"_links":{"self":[{"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/posts\/1114","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1114"}],"version-history":[{"count":1,"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/posts\/1114\/revisions"}],"predecessor-version":[{"id":2697,"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=\/wp\/v2\/posts\/1114\/revisions\/2697"}],"wp:attachment":[{"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1114"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1114"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/anada.cloudfree.jp\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1114"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}