{"id":570,"date":"2019-06-11T01:10:09","date_gmt":"2019-06-11T01:10:09","guid":{"rendered":"http:\/\/mio-web.net\/pcsupport\/?p=570"},"modified":"2019-06-11T01:10:09","modified_gmt":"2019-06-11T01:10:09","slug":"access-vba-%e3%81%a7-excel-%e3%81%ae%e3%82%bb%e3%83%ab%e8%83%8c%e6%99%af%e8%89%b2%e3%82%92%e8%a8%ad%e5%ae%9a","status":"publish","type":"post","link":"https:\/\/mio-web.net\/pcsupport\/archives\/570\/","title":{"rendered":"ACCESS VBA \u3067 EXCEL \u306e\u30bb\u30eb\u80cc\u666f\u8272\u3092\u8a2d\u5b9a"},"content":{"rendered":"\n<p>With wksTarget<\/p>\n\n\n\n<p>Select Case rst.Fields(&#8220;\u4f11\u65e5\u7a2e\u5225&#8221;).Value<\/p>\n\n\n\n<p>Case &#8220;\u6cd5\u5b9a\u4f11\u65e5&#8221;<br>\n.Range(.Cells(k, 1), .Cells(k, 12)).Interior.Color = RGB(245, 245, 245)<\/p>\n\n\n\n<p>Case &#8220;\u6cd5\u5b9a\u5916\u4f11\u65e5&#8221;<br>\n.Range(.Cells(k, 1), .Cells(k, 12)).Interior.Color = RGB(255, 228, 225)<\/p>\n\n\n\n<p>Case &#8220;\u632f\u66ff\u4f11\u65e5&#8221;, &#8220;\u4ee3\u4f11&#8221;, &#8220;\u81ea\u5df1\u90fd\u5408&#8221;, &#8220;\u4f1a\u793e\u90fd\u5408&#8221;<br>\n.Cells(k, 2).Interior.Color = RGB(255, 255, 101)<br>\n.Cells(k, 2).Font.Color = RGB(255, 0, 0)<\/p>\n\n\n\n<p>Case &#8220;\u6709\u7d66&#8221;<br>\n.Cells(k, 2).Interior.Color = RGB(204, 255, 153)<\/p>\n\n\n\n<p>End Select<\/p>\n\n\n\n<p>End With<\/p>\n","protected":false},"excerpt":{"rendered":"<p>With wksTarget Select Case rst.Fields(&#8220;\u4f11\u65e5\u7a2e\u5225&#8221;).Value Case &#8220;\u6cd5\u5b9a\u4f11\u65e5&#8221; .Range(.Cells(k, 1), . [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"vkexunit_cta_each_option":"","footnotes":""},"categories":[24],"tags":[],"class_list":["post-570","post","type-post","status-publish","format-standard","hentry","category-access"],"_links":{"self":[{"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/posts\/570","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/comments?post=570"}],"version-history":[{"count":1,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/posts\/570\/revisions"}],"predecessor-version":[{"id":571,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/posts\/570\/revisions\/571"}],"wp:attachment":[{"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/media?parent=570"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/categories?post=570"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/mio-web.net\/pcsupport\/wp-json\/wp\/v2\/tags?post=570"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}