{"id":49,"date":"2020-08-12T15:08:03","date_gmt":"2020-08-12T06:08:03","guid":{"rendered":"http:\/\/yukihyo.conohawing.com\/?p=49"},"modified":"2020-08-12T18:19:03","modified_gmt":"2020-08-12T09:19:03","slug":"%e7%a5%9d%e6%97%a5%e5%88%a4%e5%ae%9a","status":"publish","type":"post","link":"http:\/\/yukihyo.conohawing.com\/?p=49","title":{"rendered":"04_\u795d\u65e5\u5224\u5b9a"},"content":{"rendered":"\n<p>\u4eca\u56de\u306e\u30c6\u30fc\u30de\u306f\u30a8\u30af\u30bb\u30eb\u306e\u30de\u30af\u30ed\u3067\u795d\u65e5\u5224\u5b9a\u3067\u3059\u3002<br><br>\u795d\u65e5\u306b\u306f\u5468\u671f\u304c\u306a\u3044\u3088\u3046\u3067\u3059\u3002<br>\u307e\u305f\u4f01\u696d\u306b\u3088\u3063\u3066\u306f\u5275\u7acb\u8a18\u5ff5\u65e5\u306a\u3069\u306e\u795d\u65e5\u3082\u3042\u308a\u307e\u3059\u3002<br><br>\u8003\u3048\u305f\u7d50\u679c\u3001\u4e00\u65e5\u4e00\u65e5 \u66f8\u304d\u8fbc\u3080<br>\u3053\u3068\u306b\u3057\u307e\u3057\u305f\u3002<br><br>\u6b21 \u30b3\u30fc\u30c9\u3067\u3059<br><br>Dim D_num As Date<br>Dim myData(9) As String<br>Dim i As Integer<br><br>myData(0) = &#8220;&#8221;<br>myData(1) = #12\/30\/2020#<br>myData(2) = #12\/31\/2020#<br>myData(3) = &#8220;&#8221;<br>myData(4) = &#8220;&#8221;<br>myData(5) = &#8220;&#8221;<br>myData(6) = &#8220;\u5e74\u672b\u5e74\u59cb\u306e\u4f11\u307f&#8221;<br>myData(7) = &#8220;\u5e74\u672b\u5e74\u59cb\u306e\u4f11\u307f&#8221;<br>myData(8) = &#8220;&#8221;<br>myData(9) = &#8220;&#8221;<br><br>For i = LBound(myData) To UBound(myData)<br><br>Dim F_num As Long<br>For F_num = 1 To 10<br><br>D_num = CDate(Cells(F_num, 1))<br><span style=\"color:#0ca516\" class=\"has-inline-color\">\u2019\u5de6\u89d2\u306e\u30bb\u30eb\u304b\u3089\u4e0b\u306b\u5411\u304b\u3063\u306610\u30bb\u30eb\u5206\u65e5\u4ed8\u304c\u3042\u308b\u3068\u3057\u307e\u3059<br>\u2019\u3053\u306e10\u30bb\u30eb\u5206\u306e\u8868\u793a\u306f\u30a2\u30b9\u30bf\u30ea\u30b9\u30af\u306e\u306a\u3044\u65e5\u4ed8\u5f62\u5f0f\u3068\u3057\u307e\u3059<\/span><br><span style=\"color:#0ca516\" class=\"has-inline-color\">\u2019(*3\/14\/2012\u3067\u306f\u306a\u304f\u30012012\/3\/14\u3068\u3059\u308b)<\/span><\/p>\n\n\n\n<p>If InStr(myData(i), D_num) &lt;&gt; 0 Then<br>Cells(F_num, 1).Font.ColorIndex = 46<br><span class=\"tadv-color\" style=\"color:#0071a1\"><span style=\"color:#0ca516\" class=\"has-inline-color\">\u2019\u795d\u65e5\u306b\u8a72\u5f53\u3059\u308b\u30bb\u30eb\u306e\u6587\u5b57\u8272\u3092\u5909\u66f4\u3057\u307e\u3059<\/span><\/span><br>Cells(F_num, 2) = myData(i + 5)<br><span class=\"tadv-color\" style=\"color:#0071a1\"><span style=\"color:#0ca516\" class=\"has-inline-color\">\u2019\u795d\u65e5\u306b\u8a72\u5f53\u3059\u308b\u30bb\u30eb\u306e\u3059\u3050\u53f3\u306e\u30bb\u30eb\u306b\u795d\u65e5\u540d\u3092\u8a18\u8f09\u3057\u307e\u3059<\/span><\/span><\/p>\n\n\n\n<p>Exit For<br>End If<br>Next F_num<br>Next i<br><br>if\u6587\u3092\u4f7f\u3063\u3066 \u4e00\u6b21\u5143\u306e\u884c\u5217\u3092<br>\u4e8c\u6b21\u5143\u306e\u884c\u5217\u306e\u3088\u3046\u306b<br>\u51e6\u7406\u3057\u307e\u3057\u305f\u3002<br><br>\u4ee5\u4e0a\u3067\u3059<br><\/p>\n\n\n\n<p><br><\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u4eca\u56de\u306e\u30c6\u30fc\u30de\u306f\u30a8\u30af\u30bb\u30eb\u306e\u30de\u30af\u30ed\u3067\u795d\u65e5\u5224\u5b9a\u3067\u3059\u3002 \u795d\u65e5\u306b\u306f\u5468\u671f\u304c\u306a\u3044\u3088\u3046\u3067\u3059\u3002\u307e\u305f\u4f01\u696d\u306b\u3088\u3063\u3066\u306f\u5275\u7acb\u8a18\u5ff5\u65e5\u306a\u3069\u306e\u795d\u65e5\u3082\u3042\u308a\u307e\u3059\u3002 \u8003\u3048\u305f\u7d50\u679c\u3001\u4e00\u65e5\u4e00\u65e5 \u66f8\u304d\u8fbc\u3080\u3053\u3068\u306b\u3057\u307e\u3057\u305f\u3002 \u6b21 \u30b3\u30fc\u30c9\u3067\u3059 Dim D_num As D [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[8],"tags":[9],"class_list":["post-49","post","type-post","status-publish","format-standard","hentry","category-8","tag-9"],"aioseo_notices":[],"_links":{"self":[{"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=\/wp\/v2\/posts\/49","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=49"}],"version-history":[{"count":11,"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=\/wp\/v2\/posts\/49\/revisions"}],"predecessor-version":[{"id":65,"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=\/wp\/v2\/posts\/49\/revisions\/65"}],"wp:attachment":[{"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=49"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=49"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/yukihyo.conohawing.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=49"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}