{"id":1723,"date":"2015-05-05T23:43:47","date_gmt":"2015-05-05T14:43:47","guid":{"rendered":"http:\/\/excelwork.info\/excel\/?p=1723"},"modified":"2015-08-26T13:21:08","modified_gmt":"2015-08-26T04:21:08","slug":"varscope","status":"publish","type":"post","link":"https:\/\/excelwork.info\/excel\/varscope\/","title":{"rendered":"\u5909\u6570\u3084\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u30b9\u30b3\u30fc\u30d7\uff08\u9069\u7528\u7bc4\u56f2\uff09"},"content":{"rendered":"<h2>\u5909\u6570\u3084\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u30b9\u30b3\u30fc\u30d7\uff08\u9069\u7528\u7bc4\u56f2\uff09<\/h2>\n<br \/>\n<div class=\"m30-l\">\n<div class=\"kkbox\"><strong>\u3010\u69cb\u6587\uff1a\u5909\u6570\u306e\u5ba3\u8a00\u3011<\/strong><\/p>\n<p>{ <strong>Dim<\/strong> | <strong>Private<\/strong> | <strong>Public<\/strong> | <strong>Static<\/strong> } <em>varname<\/em> [ <strong>As<\/strong> <em>type<\/em> , &#8230; ]<\/p>\n<\/div>\n<br \/>\n<h3>\u3010\u9805\u76ee\u306e\u8aac\u660e\u3011<\/h3>\n<ul style=\"margin-top:0;margin-bottom:0;padding-top:0;padding-bottom:0;\">\n<li>varname&nbsp;&nbsp;\u30fb\u30fb\u30fb&nbsp;&nbsp;\u5b9a\u7fa9\u3059\u308b\u5909\u6570\u540d<\/li>\n<li>type&nbsp;&nbsp;\u30fb\u30fb\u30fb&nbsp;&nbsp;\u5909\u6570 <em>varname<\/em> \u306e\u30c7\u30fc\u30bf\u578b\uff08\u7701\u7565\u3059\u308b\u3068\u30d0\u30ea\u30a2\u30f3\u30c8\u578b\u306b\u306a\u308a\u307e\u3059\uff09\u3002\n<\/ul>\n<br \/>\n<p class=\"caution4\"><strong>Dim<\/strong> \u30b9\u30c6\u30fc\u30c8\u30e1\u30f3\u30c8\u306f\u3001\u5909\u6570\u3092\u5ba3\u8a00\u3057\u3001\u30e1\u30e2\u30ea\u9818\u57df\u3092\u5272\u308a\u5f53\u3066\u307e\u3059\u3002\n<\/p>\n<p class=\"caution4\"><strong>Private<\/strong> \u30b9\u30c6\u30fc\u30c8\u30e1\u30f3\u30c8\u3067\u5ba3\u8a00\u3055\u308c\u305f\u5909\u6570\u306f\u3001\u5ba3\u8a00\u3055\u308c\u305f\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u3067\u306e\u307f\u53c2\u7167\u3067\u304d\u307e\u3059\u3002\n<\/p>\n<p class=\"caution4\"><strong>Public<\/strong> \u30b9\u30c6\u30fc\u30c8\u30e1\u30f3\u30c8\u3067\u5ba3\u8a00\u3055\u308c\u305f\u5909\u6570\u306f\u3001<strong>Option Private Module<\/strong> \u304c\u6709\u52b9\u3067\u306a\u3044\u9650\u308a\u3001\u3059\u3079\u3066\u306e\u30a2\u30d7\u30ea\u30b1\u30fc\u30b7\u30e7\u30f3\u306e\u3059\u3079\u3066\u306e\u30e2\u30b8\u30e5\u30fc\u30eb\u306e\u3059\u3079\u3066\u306e\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u304b\u3089\u53c2\u7167\u3067\u304d\u307e\u3059\u3002\n<\/p>\n<p class=\"caution4\"><strong>Static<\/strong> \u30b9\u30c6\u30fc\u30c8\u30e1\u30f3\u30c8\u3067\u5ba3\u8a00\u3057\u305f\u5909\u6570 (\u9759\u7684\u5909\u6570) \u306e\u5024\u306f\u3001\u30d7\u30ed\u30b0\u30e9\u30e0\u304c\u5b9f\u884c\u3055\u308c\u3066\u3044\u308b\u9593\u3092\u3068\u304a\u3057\u3066\u4fdd\u6301\u3055\u308c\u307e\u3059\u3002<\/p>\n<br \/>\n<h3 id=\"variablerange\">\u5909\u6570\u30fb\u5b9a\u6570\u306e\u5ba3\u8a00\u306e\u4f4d\u7f6e\u3068\u305d\u306e\u9069\u7528\u7bc4\u56f2<\/h3>\n<table>\n<tr>\n<td bgcolor=\"#ffccff\" align = \"center\" width=\"250\"><strong>\u5834\u6240<\/strong><\/td>\n<td bgcolor=\"#ffccff\" align = \"center\" width=\"150\"><strong>\u30ad\u30fc\u30ef\u30fc\u30c9<\/strong><\/td>\n<td bgcolor=\"#ffccff\" align = \"center\" width=\"250\"><strong>\u9069\u7528\u7bc4\u56f2<\/strong><\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" rowspan=\"2\" width=\"250\">\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u5185<\/td>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Dim<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u5185<br \/>\u5b9f\u884c\u5f8c\u3001\u5024\u306f\u7834\u68c4\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Static<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u5185<br \/>\u5b9f\u884c\u5f8c\u3082\u5024\u306f\u4fdd\u6301\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" rowspan=\"3\" width=\"250\">\u6a19\u6e96\u30e2\u30b8\u30e5\u30fc\u30eb\u5ba3\u8a00\u90e8<\/td>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Dim<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u5b9f\u884c\u5f8c\u3082\u5024\u306f\u4fdd\u6301\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Private<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u5b9f\u884c\u5f8c\u3082\u5024\u306f\u4fdd\u6301\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Public<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u30d6\u30c3\u30af\u5168\u4f53<br \/>\u5b9f\u884c\u5f8c\u3082\u5024\u306f\u4fdd\u6301\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" rowspan=\"3\" width=\"250\">\u30b7\u30fc\u30c8\uff0f\u30d6\u30c3\u30af\u30e2\u30b8\u30e5\u30fc\u30eb\u5ba3\u8a00\u90e8<\/td>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Dim<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u5b9f\u884c\u5f8c\u3082\u5024\u306f\u4fdd\u6301\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Private<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u5b9f\u884c\u5f8c\u3082\u5024\u306f\u4fdd\u6301\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Public<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u305f\u3060\u3057\u300c\u89aa\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u300d\u3092\u88c5\u98fe\u3059\u308c\u3070\u4f7f\u7528\u53ef<br \/>\u3000(\u4f8b) ThisWorkbook.aaa<br \/>\u5b9f\u884c\u5f8c\u3082\u5024\u306f\u4fdd\u6301\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" rowspan=\"3\" width=\"250\">\u30d5\u30a9\u30fc\u30e0\u30e2\u30b8\u30e5\u30fc\u30eb\u5ba3\u8a00\u90e8<\/td>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Dim<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u30d5\u30a9\u30fc\u30e0\u7d42\u4e86\u6642\u306b\u5024\u306f\u7834\u68c4\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Private<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u30d5\u30a9\u30fc\u30e0\u7d42\u4e86\u6642\u306b\u5024\u306f\u7834\u68c4\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Public<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u305f\u3060\u3057\u300c\u89aa\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u300d\u3092\u88c5\u98fe\u3059\u308c\u3070\u4f7f\u7528\u53ef<br \/>\u3000(\u4f8b) Form1.aaa<br \/>\u30d5\u30a9\u30fc\u30e0\u7d42\u4e86\u6642\u306b\u5024\u306f\u7834\u68c4\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" rowspan=\"3\" width=\"250\">\u30af\u30e9\u30b9\u30e2\u30b8\u30e5\u30fc\u30eb\u5ba3\u8a00\u90e8<\/td>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Dim<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u30a4\u30f3\u30b9\u30bf\u30f3\u30b9\u7d42\u4e86\u6642\u306b\u5024\u306f\u7834\u68c4\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Private<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u30a4\u30f3\u30b9\u30bf\u30f3\u30b9\u7d42\u4e86\u6642\u306b\u5024\u306f\u7834\u68c4\u3055\u308c\u308b<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Public<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u305f\u3060\u3057\u30a4\u30f3\u30b9\u30bf\u30f3\u30b9\u304b\u3089\u306f\u4f7f\u7528\u53ef<br \/>\u3000(\u4f8b) cc.aaa<br \/>\u30a4\u30f3\u30b9\u30bf\u30f3\u30b9\u7d42\u4e86\u6642\u306b\u5024\u306f\u7834\u68c4\u3055\u308c\u308b<\/td>\n<\/tr>\n<\/table>\n<br \/><br \/>\n<h3 id=\"procedurerange\">\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u9069\u7528\u7bc4\u56f2<\/h3>\n<table>\n<tr>\n<td bgcolor=\"#ffccff\" align = \"center\" width=\"250\"><strong>\u5834\u6240<\/strong><\/td>\n<td bgcolor=\"#ffccff\" align = \"center\" width=\"150\"><strong>\u30ad\u30fc\u30ef\u30fc\u30c9<\/strong><\/td>\n<td bgcolor=\"#ffccff\" align = \"center\" width=\"250\"><strong>\u9069\u7528\u7bc4\u56f2<\/strong><\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" rowspan=\"2\" width=\"250\">\u6a19\u6e96\u30e2\u30b8\u30e5\u30fc\u30eb<\/td>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Public\uff08\u7701\u7565\u53ef\uff09<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u30d6\u30c3\u30af\u5168\u4f53<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Private<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" rowspan=\"2\" width=\"250\">\u30b7\u30fc\u30c8\u30e2\u30b8\u30e5\u30fc\u30eb\u30fb\u30d6\u30c3\u30af\u30e2\u30b8\u30e5\u30fc\u30eb<\/td>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Public\uff08\u7701\u7565\u53ef\uff09<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u305f\u3060\u3057\u300c\u30de\u30af\u30ed\u300d\u30dc\u30bf\u30f3\uff08\u958b\u767a\u30bf\u30d6\uff09\u304b\u3089\u306f\u5b9f\u884c\u53ef<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Private<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" rowspan=\"2\" width=\"250\">\u30d5\u30a9\u30fc\u30e0\u30e2\u30b8\u30e5\u30fc\u30eb<\/td>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Public\uff08\u7701\u7565\u53ef\uff09<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u305f\u3060\u3057\u300c\u89aa\u30aa\u30d6\u30b8\u30a7\u30af\u30c8\u300d\u3092\u88c5\u98fe\u3059\u308c\u3070\u5b9f\u884c\u53ef<br \/>\u3000(\u4f8b) ThisWorkbook.myfunc()<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#ffffff\" align = \"center\" width=\"150\">Private<\/td>\n<td bgcolor=\"#ffffff\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" rowspan=\"2\" width=\"250\">\u30af\u30e9\u30b9\u30e2\u30b8\u30e5\u30fc\u30eb<\/td>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Public\uff08\u7701\u7565\u53ef\uff09<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<br \/>\u305f\u3060\u3057\u30a4\u30f3\u30b9\u30bf\u30f3\u30b9\u304b\u3089\u306f\u5b9f\u884c\u53ef<br \/>\u3000(\u4f8b) cc.clsfunc<\/td>\n<\/tr>\n<tr>\n<td bgcolor=\"#eeeeee\" align = \"center\" width=\"150\">Private<\/td>\n<td bgcolor=\"#eeeeee\" width=\"250\">\u540c\u4e00\u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f<\/td>\n<\/tr>\n<\/table>\n<br \/>\n<p class=\"caution4\"><span class=\"red\"><strong>\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3<\/strong> \u306e<strong>\u69cb\u6587<\/strong><\/span>\u306b\u3064\u3044\u3066\u306f\u3001<a href=\"https:\/\/excelwork.info\/excel\/procedure\/\">\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u3092\u4f5c\u6210\u3059\u308b\uff08 Sub, Function \uff09<\/a> \u3092\u53c2\u7167\u3057\u3066\u304f\u3060\u3055\u3044\u3002\n<\/p>\n<p class=\"caution4\">\u30e2\u30b8\u30e5\u30fc\u30eb\u5ba3\u8a00\u90e8\u306b\u3001<span class=\"red\"><strong>Option Private Module<\/strong><\/span> \u304c\u8a18\u8ff0\u3055\u308c\u3066\u3044\u308b\u5834\u5408\u306f\u3001\u30e2\u30b8\u30e5\u30fc\u30eb\u81ea\u4f53\u304c\u30d7\u30e9\u30a4\u30d9\u30fc\u30c8\u3068\u3057\u3066\u5ba3\u8a00\u3055\u308c\u3001\u30a8\u30af\u30bb\u30eb\u306e\u30c4\u30fc\u30eb\u30d0\u30fc\u306b\u3042\u308b\u300c\u30de\u30af\u30ed\u300d\u30dc\u30bf\u30f3\uff08\u958b\u767a\u30bf\u30d6\uff09\u3092\u30af\u30ea\u30c3\u30af\u3057\u305f\u3068\u304d\u306b\u8868\u793a\u3055\u308c\u308b\u30de\u30af\u30ed\u306e\u4e00\u89a7\u306b\u305d\u306e\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306f\u8868\u793a\u3055\u308c\u306a\u304f\u306a\u308a\u307e\u3059\u3002<br \/>\n\u305f\u3060\u3057\u3001\u5225\u306e\u30e2\u30b8\u30e5\u30fc\u30eb\u304b\u3089\u306e\u5b9f\u884c\u306f\u53ef\u80fd\u3067\u3059\uff08\u300cPrivate\u300d\u306e\u3064\u3044\u305f\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u4ee5\u5916\uff09\u3002\u307e\u305f\u3001\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u4e2d\u3067\u5ba3\u8a00\u3055\u308c\u305f\u5909\u6570\u306f\u3001\u305d\u306e\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u5b9f\u884c\u4e2d\u3060\u3051\u6709\u52b9\u3067\u3001\u30ad\u30fc\u30ef\u30fc\u30c9 <strong>Static<\/strong> \u306b\u3088\u308a\u9759\u7684\u5909\u6570\u3068\u3057\u3066\u5ba3\u8a00\u3055\u308c\u3066\u3044\u306a\u3044\u9650\u308a\u3001\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u5b9f\u884c\u304c\u3001\u7d42\u4e86\u3059\u308b\u3068\u5024\u306f\u7834\u68c4\u3055\u308c\u307e\u3059\u3002<\/p>\n<\/div>\n<br \/>\n<h2>\u5909\u6570\u3084\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u30b9\u30b3\u30fc\u30d7\uff08\u9069\u7528\u7bc4\u56f2\uff09\u4f7f\u7528\u4f8b<\/h2>\n<div class=\"m30-l\">\n<h3 id=\"vba_sample\">\u30b5\u30f3\u30d7\u30ebVBA\u30bd\u30fc\u30b9<\/h3>\n<pre class=\"lang:vb mark:0 decode:true \" title=\"\u5909\u6570\u3084\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u30b9\u30b3\u30fc\u30d7\uff08\u9069\u7528\u7bc4\u56f2\uff09\u4f7f\u7528\u4f8b\" data-url=\"http:\/\/example.co.jp\" >\r\n\r\n\u3000\r\n'--------------------------------------------------------------------\r\n' Class1 \u30e2\u30b8\u30e5\u30fc\u30eb\u306b\u8a18\u8ff0\r\n'--------------------------------------------------------------------\r\nOption Explicit\r\n\r\nDim cls1 \u3000\u3000\u3000\u3000\u3000'Class1 \u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f\r\nPublic cls2\u3000\u3000\u3000\u3000'\u30a4\u30f3\u30b9\u30bf\u30f3\u30b9\u304b\u3089\u53c2\u7167\u53ef\r\nPrivate cls3 \u3000\u3000\u3000'Class1 \u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f\r\n\r\n\r\nSub mySet(num As Integer)\u3000'\u30a4\u30f3\u30b9\u30bf\u30f3\u30b9\u304b\u3089\u53c2\u7167\u53ef\r\n\r\n    cls1 = num * 2\r\n    cls2 = num + 100\r\n    cls3 = num - 100\r\n\r\nEnd Sub\r\n\r\n'--------------------------------------------------------------------\r\n' ThisWorkbook \u30e2\u30b8\u30e5\u30fc\u30eb\u306b\u8a18\u8ff0\r\n'--------------------------------------------------------------------\r\nDim wbk1 \u3000\u3000\u3000\u3000\u3000'ThisWorkbook \u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f\r\nPublic wbk2\u3000\u3000\u3000\u3000'\u300cThisWorkbook.wbk2\u300d\u3068\u3059\u308b\u3068\u53c2\u7167\u53ef\r\nPrivate wbk3 \u3000\u3000\u3000'ThisWorkbook \u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f\r\n\r\n\r\nSub wbk_test1()\u3000\u3000'\u300cThisWorkbook.wbk_test1\u300d\u3068\u3059\u308b\u3068\u5b9f\u884c\u53ef\r\n    \r\n    wbk1 = \"abc\"\r\n    wbk2 = wbk2 + 100\r\n    wbk3 = 1000\r\n    \r\nEnd Sub\r\n\r\n'--------------------------------------------------------------------\r\n' UserForm1 \u30e2\u30b8\u30e5\u30fc\u30eb\u306b\u8a18\u8ff0\r\n'--------------------------------------------------------------------\r\nOption Explicit\r\n\r\nDim ufrm1 \u3000\u3000\u3000\u3000'UserForm1 \u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f\r\nPublic ufrm2\u3000\u3000\u3000'\u300cUserForm1.ufrm2\u300d\u3068\u3059\u308b\u3068\u53c2\u7167\u53ef\r\nPrivate ufrm3 \u3000\u3000'UserForm1 \u30e2\u30b8\u30e5\u30fc\u30eb\u5185\u306e\u307f\r\n\r\nPublic Function xsub(aa As Integer)\u3000'\u300cUserForm1.xsub(\u5f15\u6570)\u300d\u3068\u3059\u308b\u3068\u5b9f\u884c\u53ef\r\n    \r\n    MsgBox \"aaa\"\r\n\r\nEnd Function\r\n\r\nPrivate Sub CommandButton1_Click()\r\n\r\n    xyz = 100\r\n    \r\n    MsgBox xyz\r\n\r\n\r\nEnd Sub\r\n\r\n'--------------------------------------------------------------------\r\n' \u6a19\u6e96\u30e2\u30b8\u30e5\u30fc\u30eb\u306b\u8a18\u8ff0'\r\n'--------------------------------------------------------------------\r\nOption Explicit\r\n\r\nDim aa\u3000\u3000\u3000\u3000\u3000\u3000'\u3053\u306e\u30e2\u30b8\u30e5\u30fc\u30eb\u304b\u3089\u306e\u307f\r\nPublic bb \u3000\u3000\u3000\u3000'\u30d6\u30c3\u30af\u5168\u4f53\u304b\u3089\u53c2\u7167\u53ef\r\nPrivate cc\u3000\u3000\u3000\u3000'\u3053\u306e\u30e2\u30b8\u30e5\u30fc\u30eb\u304b\u3089\u306e\u307f\r\n\r\nSub test1()\r\n    \r\n    Static num As Integer\r\n    Dim c1 As Class1\r\n    \r\n    Set c1 = New Class1\r\n    c1.mySet (125)\r\n    \r\n    aa = 1\r\n    bb = 2\r\n    cc = 3\r\n    num = 1 + num\r\n    \r\n    UserForm1.ufrm2 = \"\u3042\u3044\u3046\u3048\u304a\"\r\n    \r\n    \r\n    Debug.Print num & \"\u56de\u76ee\u306e\u5b9f\u884c\"\r\n\r\n    Debug.Print \"\u30af\u30e9\u30b9Public cls2\uff1a\" & c1.cls2\r\n    Debug.Print \"Dim            aa\uff1a\" & aa\r\n    Debug.Print \"Public         bb\uff1a\" & bb\r\n    Debug.Print \"Private        cc\uff1a\" & cc\r\n    Debug.Print \"UserForm1.ufrm2  \uff1a\" & UserForm1.ufrm2\r\n    \r\n    Call ThisWorkbook.wbk_test1\r\n    \r\n    Debug.Print \"ThisWorkbook.wbk2\uff1a\" & ThisWorkbook.wbk2\r\n    \r\n\r\nEnd Sub\r\n\r\n\u3000\r\n\r\n<\/pre>\n<br \/>\n<h3>\u5b9f\u884c\u7d50\u679c<\/h3>\n<p><a href=\"https:\/\/i1.wp.com\/excelwork.info\/excel\/wp\/wp-content\/uploads\/2015\/05\/scope01.jpg?ssl=1\" rel=\"lightbox[1723]\"><img loading=\"lazy\" src=\"https:\/\/i1.wp.com\/excelwork.info\/excel\/wp\/wp-content\/uploads\/2015\/05\/scope01.jpg?resize=400%2C225&#038;ssl=1\" alt=\"\u9069\u7528\u7bc4\u56f2\uff08\u30b9\u30b3\u30fc\u30d7\uff09\u4f8b\" width=\"400\" height=\"225\" class=\"alignnone size-medium wp-image-1742\" srcset=\"https:\/\/i1.wp.com\/excelwork.info\/excel\/wp\/wp-content\/uploads\/2015\/05\/scope01.jpg?resize=400%2C225&amp;ssl=1 400w, https:\/\/i1.wp.com\/excelwork.info\/excel\/wp\/wp-content\/uploads\/2015\/05\/scope01.jpg?resize=580%2C327&amp;ssl=1 580w, https:\/\/i1.wp.com\/excelwork.info\/excel\/wp\/wp-content\/uploads\/2015\/05\/scope01.jpg?w=730&amp;ssl=1 730w\" sizes=\"(max-width: 400px) 100vw, 400px\" data-recalc-dims=\"1\" \/><\/a><\/p>\n<br \/>\n<\/div>\n<br \/><br \/>\n","protected":false},"excerpt":{"rendered":"<p>\u5909\u6570\u3084\u30d7\u30ed\u30b7\u30fc\u30b8\u30e3\u306e\u30b9\u30b3\u30fc\u30d7\uff08\u9069\u7528\u7bc4\u56f2\uff09 \u3010\u69cb\u6587\uff1a\u5909\u6570\u306e\u5ba3\u8a00\u3011 { Dim |  &#8230; <\/p>\n","protected":false},"author":1,"featured_media":1745,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"amp_status":"","spay_email":"","jetpack_publicize_message":""},"categories":[48],"tags":[191,192,193,190,194,38,189,165,151,49,188],"jetpack_featured_media_url":"https:\/\/i0.wp.com\/excelwork.info\/excel\/wp\/wp-content\/uploads\/2015\/05\/scope01-400x2251.jpg?fit=400%2C225&ssl=1","jetpack_publicize_connections":[],"jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/s4Ye9i-varscope","_links":{"self":[{"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/posts\/1723"}],"collection":[{"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/comments?post=1723"}],"version-history":[{"count":23,"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/posts\/1723\/revisions"}],"predecessor-version":[{"id":3384,"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/posts\/1723\/revisions\/3384"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/media\/1745"}],"wp:attachment":[{"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/media?parent=1723"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/categories?post=1723"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/excelwork.info\/excel\/wp-json\/wp\/v2\/tags?post=1723"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}