{"id":5924,"date":"2016-11-21T01:07:27","date_gmt":"2016-11-20T16:07:27","guid":{"rendered":"http:\/\/www.ayim.net\/blog\/?p=5924"},"modified":"2016-11-21T21:02:47","modified_gmt":"2016-11-21T12:02:47","slug":"excel-vba%e3%80%80","status":"publish","type":"post","link":"http:\/\/www.ayim.net\/blog\/?p=5924","title":{"rendered":"EXCEL VBA\u3000"},"content":{"rendered":"<p>\u3053\u306e\u696d\u754c\u306e\u4eba\u9593\u306e\u4e2d\u3067\u306f\u6bd4\u8f03\u7684PC\u306e\u6271\u3044\u306b\u6163\u308c\u3066\u306f\u3044\u308b\u308f\u3051\u3067\u3001\u4f55\u304b\u3068\u91cd\u5b9d\u3055\u308c\u308b\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002<\/p>\n<p>\uff08\u203b\u3082\u3061\u308d\u3093\u3001\u8077\u696d\u3067\u30b3\u30f3\u30d4\u30e5\u30fc\u30bf\u30fc\u95a2\u4fc2\u306e\u958b\u767a\u306b\u643a\u308f\u3063\u305f\u3053\u3068\u304c\u3042\u308b\u65b9\u306b\u6bd4\u3079\u305f\u3089\u5b50\u4f9b\u307f\u305f\u3044\u306a\u3082\u306e\u3067\u3059\u304c\u3002\u3002\uff09<\/p>\n<p>\u6c17\u304c\u4ed8\u304f\u3068\u3001\u3053\u308c\u3067\u304d\u308b\uff1f\u3068\u304b\u30c1\u30a7\u30c3\u30af\u304a\u9858\u3044\u3057\u307e\u3059\u3002\u3068\u304b\u306e\u8a71\u304c\u821e\u3044\u8fbc\u3093\u3067\u304d\u307e\u3059\u3002\u3057\u304b\u3082\u30d7\u30ed\u3067\u4ed5\u4e8b\u3092\u3057\u3066\u3044\u308b\u308f\u3051\u3067\u306f\u306a\u3044\u306e\u3067\u53ce\u5165\u306b\u7e4b\u304c\u308b\u3053\u3068\u306f\u306a\u304f\u3001\u6642\u9593\u3060\u3051\u304c\u6d88\u8cbb\u3055\u308c\u3066\u3044\u304f\u3053\u3068\u306b\u306a\u308a\u307e\u3059\u3002<\/p>\n<p>\u3067\u3001\u4eca\u3001\u3068\u3042\u308b\u30a8\u30af\u30bb\u30eb\u306e\u96c6\u8a08\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u30c1\u30a7\u30c3\u30af\u304a\u3088\u3073\u4fee\u6b63\u3092\u3057\u3066\u3044\u308b\u308f\u3051\u3067\u3059\u3002<\/p>\n<p>\u305d\u3046\u3059\u308b\u3068\u3001\u3053\u3046\u3084\u3063\u305f\u65b9\u304c\u4fbf\u5229\u3060\u306a\u3002\u3068\u304b\u3001\u3053\u3046\u3044\u3046\u6a5f\u80fd\u3092\u4ed8\u3051\u3066\u304a\u3053\u3046\u3002\u3068\u304b\u8003\u3048\u3066\u3057\u307e\u3046\u308f\u3051\u3067\u3059\u3002<\/p>\n<p>EXCEL\u306b\u8a08\u7b97\u5f0f\uff08\u95a2\u6570\uff09\u3092\u5165\u308c\u308b\u3053\u3068\u306f\u826f\u304f\u3084\u308a\u307e\u3059\u304c\u3001<\/p>\n<p>\u3061\u3087\u3063\u3068\u9032\u3093\u3067\u30de\u30af\u30ed\u3092\u8a2d\u5b9a\u3057\u3066\u30dc\u30bf\u30f3\u3092\u4f5c\u3063\u3066\u81ea\u52d5\u51e6\u7406\u3055\u305b\u3088\u3046\u3002\u3068\u304b\u8003\u3048\u308b\u3068\u3001<\/p>\n<p>\u3055\u3089\u306b\u4e00\u822c\u5316\u3055\u305b\u3066\u4ed6\u306e\u30b7\u30fc\u30c8\u3067\u3082\u3067\u304d\u308b\u69d8\u306b\u3002\u3002\u306a\u3093\u3066\u3068\u3053\u308d\u307e\u3067\u884c\u3063\u3066\u3057\u307e\u3063\u3066\u3001\u3069\u3046\u3057\u3066\u3082\u305d\u308c\u4ee5\u4e0a\u306e\u77e5\u8b58\u304c\u5fc5\u8981\u306b\u306a\u308a\u307e\u3059\u3002<\/p>\n<p>\u305d\u3046\u306a\u308b\u3068\u3001VBA\u3068\u3044\u3046\u30d7\u30ed\u30b0\u30e9\u30e0\u8a00\u8a9e\u3092\u7528\u3044\u3066\u51e6\u7406\u3092\u3055\u305b\u308b\u3053\u3068\u306b\u306a\u308a\u307e\u3059\u3002<\/p>\n<p>\u3082\u3061\u308d\u3093\u8077\u696d\u3067\u958b\u767a\u3092\u3057\u3066\u3044\u308b\u65b9\u306a\u3089\u3001\u96e3\u3057\u304f\u3082\u306a\u3044\u3053\u3068\u3060\u3068\u601d\u3044\u307e\u3059\u304c\u3001\u305d\u3053\u307e\u3067\u884c\u304f\u3068\u306a\u304b\u306a\u304b\u5927\u5909\u3067\u306f\u3042\u308a\u307e\u3059\u3002<\/p>\n<p>\u666e\u6bb5\u4f7f\u308f\u306a\u3044\u3084\u308a\u65b9\uff08\u8a00\u8449\uff09\u3067EXCEL\u3092\u52d5\u304b\u305d\u3046\u3063\u3066\u3044\u3046\u3060\u304b\u3089\u306d\u3002<\/p>\n<p>\u96c6\u4e2d\u3057\u3066\u4e8b\u306b\u5f53\u305f\u3063\u3066\u3044\u308b\u3068\u304d\u306f\u3001\u529b\u3092\u767a\u63ee\u3057\u307e\u3059\u304c\u3001\u3053\u3093\u306a\u3053\u3068\u304c\u983b\u7e41\u306b\u3042\u308b\u308f\u3051\u3067\u306f\u306a\u3044\u306e\u3067\u3059\u3050\u306b\u5fd8\u308c\u307e\u3059\u3002<\/p>\n<p>\u3063\u3066\u3053\u3068\u3067\u5099\u5fd8\u9332\u3002\u3002\u307e\u305a\u306f<\/p>\n<p><span style=\"color: #ff0000;\"><strong>\uff1c\uff1cBIB\u9806\u306b\u4e26\u3079\u66ff\u3048\u308b\u30d7\u30ed\u30b0\u30e9\u30e0\uff1e\uff1e<\/strong><\/span><\/p>\n<p>\u203b\u30dd\u30a4\u30f3\u30c8\u306f\u3001\u30ab\u30c6\u30b4\u30ea\u30fc\u306b\u3088\u3063\u3066\u4eba\u6570\u304c\u9055\u3046\u306e\u3067\u30c7\u30fc\u30bf\u6570\u3092\u8abf\u3079\u3066B\u5217\u306b\u3042\u308bBIB\u756a\u53f7\u9806\u306b\u4e26\u3079\u66ff\u3048\u308b\u3068\u3053\u308d\u3002<\/p>\n<p>Sub BIB\u9806\u4e26\u3079\u66ff\u3048()<br \/>\n&#8216;<br \/>\nMaxRow1 = Rows.Count<br \/>\nMaxRow1 = Range(&#8220;B5&#8221;).End(xlDown).Row<\/p>\n<p>ActiveSheet.Sort.SortFields.Clear<br \/>\nRange(&#8220;B5:AI&#8221; &amp; MaxRow1) _<br \/>\n.Sort Key1:=Range(&#8220;B5&#8221;), Order1:=xlAscending, Header:=xlNo, _<br \/>\nOrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _<br \/>\n:=xlPinYin<\/p>\n<p>Range(&#8220;S5&#8221;).Select<br \/>\nEnd Sub<\/p>\n<p><strong><span style=\"color: #ff0000;\">\uff1c\uff1c\u6210\u7e3e\u9806\u306b\u4e26\u3079\u308b\u30d7\u30ed\u30b0\u30e9\u30e0\uff1e\uff1e<\/span><\/strong><\/p>\n<p>\u3055\u3063\u304d\u3068\u4f3c\u305f\u611f\u3058\u3060\u3051\u3069\u3001\u30bd\u30fc\u30c8\u306e\u30ad\u30fc\u304c\u4e09\u3064\u3042\u308b\u3068\u3053\u308d\u3002\u540c\u3058\u304f\u30c7\u30fc\u30bf\u6570\u3092\u8abf\u3079\u3066\u3044\u307e\u3059\u3002<\/p>\n<p>Sub \u6210\u7e3e\u9806\u4e26\u3079\u66ff\u3048()<br \/>\n&#8216;<br \/>\nMaxRow2 = Rows.Count<br \/>\nMaxRow2 = Range(&#8220;B5&#8221;).End(xlDown).Row<\/p>\n<p>ActiveSheet.Sort.SortFields.Clear<\/p>\n<p>Range(&#8220;B5:AI&#8221; &amp; MaxRow2) _<br \/>\n.Sort Key1:=Range(&#8220;T5&#8221;), Order1:=xlDescending, Header:=xlNo, _<br \/>\nKey2:=Range(&#8220;Y5&#8221;), order2:=xlDescending, Header:=xlNo, _<br \/>\nKey3:=Range(&#8220;AD5&#8221;), Order3:=xlDescending, Header:=xlNo<\/p>\n<p>Range(&#8220;S5&#8221;).Select<\/p>\n<p>End Sub<\/p>\n<p><strong><span style=\"color: #ff0000;\">\uff1c\uff1c\u6761\u4ef6\u3092\u6e80\u305f\u3057\u305f\u4eba\u306e\u307f\u306e\u9806\u4f4d\u3067\u4e26\u3079\u66ff\u3048\u308b\u30d7\u30ed\u30b0\u30e9\u30e0\uff1e\uff1e<\/span><\/strong><\/p>\n<p>\u3055\u3063\u304d\u3068\u9055\u3046\u306e\u306f\u30bd\u30fc\u30c8\u306e\u30ad\u30fc\u304c4\u3064\u306b\u306a\u3063\u3066\u308b\u3002VBA\u3067\u306f\u30bd\u30fc\u30c8\u306f3\u3064\u3057\u304b\u8a2d\u5b9a\u3067\u304d\u306a\u3044\u30024\u3064\u4ee5\u4e0a\u306e\u5834\u5408\u306f3\u3064\u306e\u304b\u305f\u307e\u308a\u306b\u5206\u3051\u3066\u4e0b\u4f4d\u306e\u30ad\u30fc\u304b\u3089\u30bd\u30fc\u30c8\u3092\u304b\u3051\u308b\u3053\u3068\u3002\u3053\u306e\u4f8b\u3067\u306f\u3001G&gt;T&gt;Y&gt;AD\u306e\u9806\u3067\u30bd\u30fc\u30c8\u304c\u304b\u304b\u308b<\/p>\n<p>Sub \u6761\u4ef6\u3092\u6e80\u305f\u3057\u305f\u4eba\u306e\u9806\u4f4d()<br \/>\n&#8216;<br \/>\nMaxRow3 = Rows.Count<br \/>\nMaxRow3 = Range(&#8220;B5&#8221;).End(xlDown).Row<\/p>\n<p>ActiveSheet.Sort.SortFields.Clear<\/p>\n<p>Range(&#8220;B5:AI&#8221; &amp; MaxRow3) _<br \/>\n.Sort Key1:=Range(&#8220;AD5&#8221;), Order1:=xlDescending, Header:=xlNo<br \/>\nRange(&#8220;B5:AI&#8221; &amp; MaxRow3) _<br \/>\n.Sort Key1:=Range(&#8220;G5&#8221;), Order1:=xlDescending, Header:=xlNo, _<br \/>\nKey2:=Range(&#8220;T5&#8221;), order2:=xlDescending, Header:=xlNo, _<br \/>\nKey3:=Range(&#8220;Y5&#8221;), Order3:=xlDescending, Header:=xlNo<\/p>\n<p>Range(&#8220;S5&#8221;).Select<\/p>\n<p>End Sub<\/p>\n<p><strong><span style=\"color: #ff0000;\">\uff1c\uff1c\u5e74\u9f62\u30ab\u30c6\u30b4\u30ea\u30fc\u5225\u9806\u4f4d\uff1e\uff1e<\/span><\/strong><\/p>\n<p>\u3053\u308c\u304c\u4e00\u756a\u5927\u5909\u3060\u3063\u305f\u3002\u30bd\u30fc\u30c8\u306e\u30ad\u30fc4\u3064\u3067\u3055\u3063\u304d\u3068\u540c\u3058\u306a\u3093\u3060\u3051\u3069\u3001\u30c7\u30fc\u30bf\u304c\u6570\u5024\u3067\u306f\u306a\u304f\u6587\u5b57\u5217\u306a\u3053\u3068\u3002\u6587\u5b57\u5217\u3092\u5358\u7d14\u306b\u30bd\u30fc\u30c8\u3059\u308b\u3068\u5e74\u9f62\u5225\u3067\u306f\u306a\u304f\u3072\u3089\u304c\u306a\u9806\u306b\u306a\u308b\u306e\u3067\u3001\u5e74\u9f62\u9806\uff08\u5c0f\u4e2d\u9ad8\u5c02\u5927\uff09\u3068\u3044\u3046\u9806\u306b\u51fa\u529b\u3057\u305f\u304b\u3063\u305f\u3002<\/p>\n<p>\u305d\u306e\u305f\u3081\u306bCustomOrder\u3068\u3044\u3046\u5f15\u6570\u3092\u4f7f\u308f\u306a\u3051\u308c\u3070\u306a\u3089\u306a\u3044\u304c\u3001\u305d\u306e\u305f\u3081\u306bSortFields\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u3092\u4f7f\u3046\u5fc5\u8981\u304c\u3042\u308a\u3001\u305d\u306e\u305f\u3081\u306b\u4eca\u958b\u3044\u3066\u3044\u308b\u30b7\u30fc\u30c8\u3092\u8abf\u3079\u308bSelectedSheets\u3092\u4f7f\u308f\u306a\u3051\u308c\u3070\u3044\u3051\u306a\u304b\u3063\u305f\u3002<\/p>\n<p>Sub \u5e74\u9f62\u5225\u6210\u7e3e()<br \/>\n&#8216;<br \/>\nDim sh As Worksheet<\/p>\n<p>MaxRow4 = Rows.Count<br \/>\nMaxRow4 = Range(&#8220;B5&#8221;).End(xlDown).Row<\/p>\n<p>For Each sh In ActiveWindow.SelectedSheets<\/p>\n<p>sh.Sort.SortFields.Clear<\/p>\n<p>sh.Sort.SortFields.Add Key:=Range(&#8220;J5:J&#8221; &amp; MaxRow4), _<br \/>\nSortOn:=xlSortOnValues, Order:=xlAscending, CustomOrder:=&#8221;\u5c0f\u5b66\u751f,\u4e2d\u5b66\u751f,\u9ad8\u6821\u751f,\u5c02\u9580\u5b66\u6821,\u5927\u5b66\u751f&#8221;, _<br \/>\nDataOption:=xlSortNormal<\/p>\n<p>sh.Sort.SortFields.Add Key:=Range(&#8220;T5:T&#8221; &amp; MaxRow4), _<br \/>\nSortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal<br \/>\nsh.Sort.SortFields.Add Key:=Range(&#8220;Y5:Y&#8221; &amp; MaxRow4), _<br \/>\nSortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal<br \/>\nsh.Sort.SortFields.Add Key:=Range(&#8220;AD5:AD&#8221; &amp; MaxRow4), _<br \/>\nSortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal<br \/>\nWith sh.Sort<br \/>\n.SetRange Range(&#8220;B5:AI&#8221; &amp; MaxRow4)<br \/>\n.Header = xlGuess<br \/>\n.MatchCase = False<br \/>\n.Orientation = xlTopToBottom<br \/>\n.SortMethod = xlPinYin<br \/>\n.Apply<br \/>\nEnd With<\/p>\n<p>Next sh<\/p>\n<p>Range(&#8220;T5&#8221;).Select<br \/>\nEnd Sub<\/p>\n<p>\u6b8b\u5ff5\u306a\u3053\u3068\u306b\u3001\u4e00\u756a\u6700\u5f8c\u306e\u30d7\u30ed\u30b0\u30e9\u30e0\u304c\u6700\u8fd1\u306eEXCEL\u306e\u6a5f\u80fd\u306b\u306a\u3063\u3066\u3044\u308b\u3088\u3046\u306a\u306e\u3067EXCEL2007\u4ee5\u964d\u3067\u306a\u3044\u3068\u52d5\u304b\u3044\u3088\u3046\u3067\u3059\u3002<\/p>\n<p>\u540c\u3058\u30bd\u30fc\u30c8\u3067\u3082\u30ad\u30fc\u304c\u9055\u3063\u305f\u308a\u30ad\u30fc\u306e\u500b\u6570\u304c\u9055\u3063\u305f\u308a\u3001\u30ad\u30fc\u306e\u8981\u7d20\u304c\u9055\u3063\u305f\u308a\u3067\u9055\u3046\u30d7\u30ed\u30b0\u30e9\u30e0\u304c\u51fa\u6765\u4e0a\u304c\u308a\u307e\u3057\u305f\u3002<\/p>\n<p>\u307e\u3041\uff5e\u306a\u3093\u306e\u3053\u3063\u3061\u3083\uff1f\u3063\u3066\u3053\u3068\u3067\u3059\u304c\u3001\u3042\u304f\u307e\u3067\u5099\u5fd8\u9332\u3067\u3059\u3002<\/p>\n<p>\u30ce\u30fc\u30c8\u306b\u30e1\u30e2\u3059\u308b\u3068\u30e1\u30e2\u3092\u7121\u304f\u3059\u306e\u3067\u3001web\u4e0a\u306b\u30e1\u30e2\u3057\u3066\u304a\u3053\u3046\u3068\u3057\u305f\u3060\u3051\u3067\u3059\u3002\u3002<\/p>\n<p>\u3082\u3063\u3068\u7c21\u5358\u306b\u3067\u304d\u308b\u65b9\u6cd5\u3082\u3042\u308b\u304b\u3082\u3057\u308c\u307e\u305b\u3093\u304c\u3001\u3068\u308a\u3042\u3048\u305a\u4e88\u5b9a\u901a\u308a\u52d5\u3044\u3066\u3044\u308b\u306e\u3067\u826f\u3057\u3068\u3057\u307e\u3059\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u3053\u306e\u696d\u754c\u306e\u4eba\u9593\u306e\u4e2d\u3067\u306f\u6bd4\u8f03\u7684PC\u306e\u6271\u3044\u306b\u6163\u308c\u3066\u306f\u3044\u308b\u308f\u3051\u3067\u3001\u4f55\u304b\u3068\u91cd\u5b9d\u3055\u308c\u308b\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002 \uff08\u203b\u3082\u3061\u308d\u3093\u3001\u8077\u696d\u3067\u30b3\u30f3\u30d4\u30e5\u30fc\u30bf\u30fc\u95a2\u4fc2\u306e\u958b\u767a\u306b\u643a\u308f\u3063\u305f\u3053\u3068\u304c\u3042\u308b\u65b9\u306b\u6bd4\u3079\u305f\u3089\u5b50\u4f9b\u307f\u305f\u3044\u306a\u3082\u306e\u3067\u3059\u304c\u3002\u3002\uff09 \u6c17\u304c\u4ed8\u304f\u3068\u3001\u3053\u308c\u3067\u304d [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"sns_share_botton_hide":"","vkExUnit_sns_title":"","_vk_print_noindex":"","sitemap_hide":"","_veu_custom_css":"","veu_display_promotion_alert":"","vkexunit_cta_each_option":"","_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":true,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2},"jetpack_post_was_ever_published":false},"categories":[1],"tags":[],"class_list":["post-5924","post","type-post","status-publish","format-standard","hentry","category-1"],"veu_head_title_object":{"title":"","add_site_title":""},"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v27.6 - https:\/\/yoast.com\/product\/yoast-seo-wordpress\/ -->\n<title>EXCEL VBA\u3000 - \u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"http:\/\/www.ayim.net\/blog\/?p=5924\" \/>\n<meta property=\"og:locale\" content=\"ja_JP\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"EXCEL VBA\u3000 - \u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb\" \/>\n<meta property=\"og:description\" content=\"\u3053\u306e\u696d\u754c\u306e\u4eba\u9593\u306e\u4e2d\u3067\u306f\u6bd4\u8f03\u7684PC\u306e\u6271\u3044\u306b\u6163\u308c\u3066\u306f\u3044\u308b\u308f\u3051\u3067\u3001\u4f55\u304b\u3068\u91cd\u5b9d\u3055\u308c\u308b\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002 \uff08\u203b\u3082\u3061\u308d\u3093\u3001\u8077\u696d\u3067\u30b3\u30f3\u30d4\u30e5\u30fc\u30bf\u30fc\u95a2\u4fc2\u306e\u958b\u767a\u306b\u643a\u308f\u3063\u305f\u3053\u3068\u304c\u3042\u308b\u65b9\u306b\u6bd4\u3079\u305f\u3089\u5b50\u4f9b\u307f\u305f\u3044\u306a\u3082\u306e\u3067\u3059\u304c\u3002\u3002\uff09 \u6c17\u304c\u4ed8\u304f\u3068\u3001\u3053\u308c\u3067\u304d [&hellip;]\" \/>\n<meta property=\"og:url\" content=\"http:\/\/www.ayim.net\/blog\/?p=5924\" \/>\n<meta property=\"og:site_name\" content=\"\u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb\" \/>\n<meta property=\"article:author\" content=\"https:\/\/www.facebook.com\/takehiro.miya\" \/>\n<meta property=\"article:published_time\" content=\"2016-11-20T16:07:27+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2016-11-21T12:02:47+00:00\" \/>\n<meta name=\"author\" content=\"ayim\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"\u57f7\u7b46\u8005\" \/>\n\t<meta name=\"twitter:data1\" content=\"ayim\" \/>\n\t<meta name=\"twitter:label2\" content=\"\u63a8\u5b9a\u8aad\u307f\u53d6\u308a\u6642\u9593\" \/>\n\t<meta name=\"twitter:data2\" content=\"1\u5206\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\\\/\\\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924#article\",\"isPartOf\":{\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924\"},\"author\":{\"name\":\"ayim\",\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/#\\\/schema\\\/person\\\/cef59b3b4316dea8826f3bf6559c59dd\"},\"headline\":\"EXCEL VBA\u3000\",\"datePublished\":\"2016-11-20T16:07:27+00:00\",\"dateModified\":\"2016-11-21T12:02:47+00:00\",\"mainEntityOfPage\":{\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924\"},\"wordCount\":284,\"commentCount\":0,\"inLanguage\":\"ja\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924\",\"url\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924\",\"name\":\"EXCEL VBA\u3000 - \u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb\",\"isPartOf\":{\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/#website\"},\"datePublished\":\"2016-11-20T16:07:27+00:00\",\"dateModified\":\"2016-11-21T12:02:47+00:00\",\"author\":{\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/#\\\/schema\\\/person\\\/cef59b3b4316dea8826f3bf6559c59dd\"},\"breadcrumb\":{\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924#breadcrumb\"},\"inLanguage\":\"ja\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?p=5924#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"\u30db\u30fc\u30e0\",\"item\":\"http:\\\/\\\/www.ayim.net\\\/blog\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"EXCEL VBA\u3000\"}]},{\"@type\":\"WebSite\",\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/#website\",\"url\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/\",\"name\":\"\u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb\",\"description\":\"\u6771\u5317\u301c\u95a2\u6771\u30d5\u30ea\u30fc\u30a4\u30f3\u30b9\u30c8\u30e9\u30af\u30bf\u30fc\u3068\u3057\u3066\u6d3b\u52d5\",\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"ja\"},{\"@type\":\"Person\",\"@id\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/#\\\/schema\\\/person\\\/cef59b3b4316dea8826f3bf6559c59dd\",\"name\":\"ayim\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"ja\",\"@id\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/6e157d124bfd6a0402eb24e970f7dfeca0a4a26f78294c552dcad810b96beb02?s=96&d=mm&r=g\",\"url\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/6e157d124bfd6a0402eb24e970f7dfeca0a4a26f78294c552dcad810b96beb02?s=96&d=mm&r=g\",\"contentUrl\":\"https:\\\/\\\/secure.gravatar.com\\\/avatar\\\/6e157d124bfd6a0402eb24e970f7dfeca0a4a26f78294c552dcad810b96beb02?s=96&d=mm&r=g\",\"caption\":\"ayim\"},\"sameAs\":[\"https:\\\/\\\/www.facebook.com\\\/takehiro.miya\",\"https:\\\/\\\/www.instagram.com\\\/ayim38\\\/\",\"https:\\\/\\\/www.youtube.com\\\/@blogsbs\"],\"url\":\"http:\\\/\\\/www.ayim.net\\\/blog\\\/?author=1\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"EXCEL VBA\u3000 - \u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"http:\/\/www.ayim.net\/blog\/?p=5924","og_locale":"ja_JP","og_type":"article","og_title":"EXCEL VBA\u3000 - \u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb","og_description":"\u3053\u306e\u696d\u754c\u306e\u4eba\u9593\u306e\u4e2d\u3067\u306f\u6bd4\u8f03\u7684PC\u306e\u6271\u3044\u306b\u6163\u308c\u3066\u306f\u3044\u308b\u308f\u3051\u3067\u3001\u4f55\u304b\u3068\u91cd\u5b9d\u3055\u308c\u308b\u3053\u3068\u304c\u3042\u308a\u307e\u3059\u3002 \uff08\u203b\u3082\u3061\u308d\u3093\u3001\u8077\u696d\u3067\u30b3\u30f3\u30d4\u30e5\u30fc\u30bf\u30fc\u95a2\u4fc2\u306e\u958b\u767a\u306b\u643a\u308f\u3063\u305f\u3053\u3068\u304c\u3042\u308b\u65b9\u306b\u6bd4\u3079\u305f\u3089\u5b50\u4f9b\u307f\u305f\u3044\u306a\u3082\u306e\u3067\u3059\u304c\u3002\u3002\uff09 \u6c17\u304c\u4ed8\u304f\u3068\u3001\u3053\u308c\u3067\u304d [&hellip;]","og_url":"http:\/\/www.ayim.net\/blog\/?p=5924","og_site_name":"\u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb","article_author":"https:\/\/www.facebook.com\/takehiro.miya","article_published_time":"2016-11-20T16:07:27+00:00","article_modified_time":"2016-11-21T12:02:47+00:00","author":"ayim","twitter_card":"summary_large_image","twitter_misc":{"\u57f7\u7b46\u8005":"ayim","\u63a8\u5b9a\u8aad\u307f\u53d6\u308a\u6642\u9593":"1\u5206"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"http:\/\/www.ayim.net\/blog\/?p=5924#article","isPartOf":{"@id":"http:\/\/www.ayim.net\/blog\/?p=5924"},"author":{"name":"ayim","@id":"http:\/\/www.ayim.net\/blog\/#\/schema\/person\/cef59b3b4316dea8826f3bf6559c59dd"},"headline":"EXCEL VBA\u3000","datePublished":"2016-11-20T16:07:27+00:00","dateModified":"2016-11-21T12:02:47+00:00","mainEntityOfPage":{"@id":"http:\/\/www.ayim.net\/blog\/?p=5924"},"wordCount":284,"commentCount":0,"inLanguage":"ja","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["http:\/\/www.ayim.net\/blog\/?p=5924#respond"]}]},{"@type":"WebPage","@id":"http:\/\/www.ayim.net\/blog\/?p=5924","url":"http:\/\/www.ayim.net\/blog\/?p=5924","name":"EXCEL VBA\u3000 - \u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb","isPartOf":{"@id":"http:\/\/www.ayim.net\/blog\/#website"},"datePublished":"2016-11-20T16:07:27+00:00","dateModified":"2016-11-21T12:02:47+00:00","author":{"@id":"http:\/\/www.ayim.net\/blog\/#\/schema\/person\/cef59b3b4316dea8826f3bf6559c59dd"},"breadcrumb":{"@id":"http:\/\/www.ayim.net\/blog\/?p=5924#breadcrumb"},"inLanguage":"ja","potentialAction":[{"@type":"ReadAction","target":["http:\/\/www.ayim.net\/blog\/?p=5924"]}]},{"@type":"BreadcrumbList","@id":"http:\/\/www.ayim.net\/blog\/?p=5924#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"\u30db\u30fc\u30e0","item":"http:\/\/www.ayim.net\/blog"},{"@type":"ListItem","position":2,"name":"EXCEL VBA\u3000"}]},{"@type":"WebSite","@id":"http:\/\/www.ayim.net\/blog\/#website","url":"http:\/\/www.ayim.net\/blog\/","name":"\u975e\u516c\u8a8d\u30d6\u30ed\u30b0\u30b9\u30ce\u30fc\u30dc\u30fc\u30c9\u30b9\u30af\u30fc\u30eb","description":"\u6771\u5317\u301c\u95a2\u6771\u30d5\u30ea\u30fc\u30a4\u30f3\u30b9\u30c8\u30e9\u30af\u30bf\u30fc\u3068\u3057\u3066\u6d3b\u52d5","potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"http:\/\/www.ayim.net\/blog\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"ja"},{"@type":"Person","@id":"http:\/\/www.ayim.net\/blog\/#\/schema\/person\/cef59b3b4316dea8826f3bf6559c59dd","name":"ayim","image":{"@type":"ImageObject","inLanguage":"ja","@id":"https:\/\/secure.gravatar.com\/avatar\/6e157d124bfd6a0402eb24e970f7dfeca0a4a26f78294c552dcad810b96beb02?s=96&d=mm&r=g","url":"https:\/\/secure.gravatar.com\/avatar\/6e157d124bfd6a0402eb24e970f7dfeca0a4a26f78294c552dcad810b96beb02?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/6e157d124bfd6a0402eb24e970f7dfeca0a4a26f78294c552dcad810b96beb02?s=96&d=mm&r=g","caption":"ayim"},"sameAs":["https:\/\/www.facebook.com\/takehiro.miya","https:\/\/www.instagram.com\/ayim38\/","https:\/\/www.youtube.com\/@blogsbs"],"url":"http:\/\/www.ayim.net\/blog\/?author=1"}]}},"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p4QkBq-1xy","jetpack-related-posts":[],"jetpack_likes_enabled":true,"_links":{"self":[{"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5924","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=5924"}],"version-history":[{"count":4,"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5924\/revisions"}],"predecessor-version":[{"id":5928,"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=\/wp\/v2\/posts\/5924\/revisions\/5928"}],"wp:attachment":[{"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=5924"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=5924"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.ayim.net\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=5924"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}