{"id":1040,"date":"2009-04-13T00:30:52","date_gmt":"2009-04-12T15:30:52","guid":{"rendered":"http:\/\/fukata.org\/?p=1040"},"modified":"2017-08-11T22:59:09","modified_gmt":"2017-08-11T22:59:09","slug":"excel-vba-switching-sheet-list","status":"publish","type":"post","link":"https:\/\/blog.fukata.org\/archives\/1040\/","title":{"rendered":"\u5207\u308a\u66ff\u3048\u53ef\u80fd\u306a\u30b7\u30fc\u30c8\u4e00\u89a7"},"content":{"rendered":"<p><a title=\"sheet_list_macro\" href=\"https:\/\/farm6.static.flickr.com\/5092\/5476237002_09cfd531d5_m.jpg\" target=\"_blank\"><img loading=\"lazy\" class=\"attachment wp-att-1042 alignleft\" src=\"https:\/\/farm6.static.flickr.com\/5092\/5476237002_09cfd531d5_m.jpg\" alt=\"sheet_list_macro\" width=\"200\" height=\"137\" \/><\/a>\u4ed5\u4e8b\u3067\u5229\u7528\u3057\u3066\u3044\u308b\u30c6\u30fc\u30d6\u30eb\u4e00\u89a7\u306e\u30a8\u30af\u30bb\u30eb\u304c\u3042\u308b\u3093\u3067\u3059\u3051\u3069\u3001\u80a5\u5927\u5316\u3057\u3059\u304e\u3066\u76ee\u7684\u306e\u30c6\u30fc\u30d6\u30eb\u3092\u63a2\u3059\u70ba\u306b\u53f3\u306b\u884c\u3063\u305f\u308a\u5de6\u306b\u884c\u3063\u305f\u308a\u3068\u4e00\u82e6\u52b4\u3060\u3063\u305f\u306e\u3067\u3001\u30b7\u30fc\u30c8\u5207\u308a\u66ff\u3048\u6a5f\u80fd\u306e\u4ed8\u3044\u305f\u30b7\u30fc\u30c8\u4e00\u89a7\u3092\u4f5c\u6210\u3057\u3066\u307f\u307e\u3057\u305f\u3002<\/p>\n<p>\u4f5c\u6210\u3057\u3066\u307f\u307e\u3057\u305f\u3002\u3068\u8a00\u3063\u3066\u3082\u30b3\u30fc\u30c9\u306f\u3069\u308c\u3082\u30cd\u30c3\u30c8\u306b\u8ee2\u304c\u3063\u3066\u3044\u305f\u7269\u3092\u6d41\u7528\u3057\u305f\u3060\u3051\u306e\u30a2\u30c9\u30db\u30c3\u30af\u306a\u30b3\u30fc\u30c9\u3067\u3059\u3002<\/p>\n<p>\u53c2\u8003\u306b\u306a\u308b\u304b\u3069\u3046\u304b\u308f\u304b\u3089\u306a\u3044\u3067\u3059\u3051\u3069\u3001\u4ee5\u4e0b\u306b\u8cbc\u308a\u4ed8\u3051\u3066\u304a\u304d\u307e\u3059\u3002\u4ee5\u4e0b\u306e\u30b3\u30fc\u30c9\u3092\u5bfe\u8c61\u306e\u30b7\u30fc\u30c8\u306e\u30de\u30af\u30ed\u3068\u3057\u3066\u767b\u9332\u3057\u307e\u3059\u3002<\/p>\n<p>\u3061\u306a\u307f\u306b\u3001\u4e0b\u8a18\u306b\u8868\u793a\u3057\u3066\u3044\u308b\u30b3\u30fc\u30c9\u306a\u3093\u3067\u3059\u3051\u3069\u3001WP-Syntax\u3068\u3044\u3046\u30d7\u30e9\u30b0\u30a4\u30f3\u3092\u5229\u7528\u3057\u3066\u3044\u308b\u3093\u3067\u3059\u304c\u3001\u305d\u308c\u306e\u5bfe\u5fdc\u8a00\u8a9e\u3092\u4ee5\u524d\u8abf\u3079\u305f\u3053\u3068\u304c\u3042\u3063\u305f\u3093\u3067\u3059\u304c\u5fd8\u308c\u3066\u3057\u307e\u3063\u305f\u3093\u3067\u3001\u518d\u5ea6\u8abf\u3079\u307e\u3057\u305f\u3002URL\u3092\u306f\u3063\u3064\u3051\u3066\u304a\u304d\u307e\u3059\u3002<\/p>\n<p>https:\/\/qbnz.com\/highlighter\/<\/p>\n<p>\u4e0a\u8a18\u30da\u30fc\u30b8\u306e\u5de6\u306b\u3042\u308b\u300cSupported Languages\u300d\u3068\u3044\u3046\u306e\u304c\u30b5\u30dd\u30fc\u30c8\u3057\u3066\u3044\u308b\u8a00\u8a9e\u4e00\u89a7\u306b\u306a\u308b\u305d\u3046\u3067\u3059\u3002<\/p>\n<p>\u88dc\u8db3\u3067\u3059\u3051\u3069\u3001\u4e0b\u8a18\u306e\u30b3\u30fc\u30c9\u306fVB\u306a\u3093\u3067\u3059\u3051\u3069\u3001\u4e0a\u8a18\u306e\u30b5\u30a4\u30c8\u3092\u898b\u308b\u3068VB.NET\u306f\u30b5\u30dd\u30fc\u30c8\u3057\u3066\u3044\u308b\u3093\u3067\u3059\u304c\u3001lang\u5c5e\u6027\u306b\u300cVB.NET\u300d\u3092\u6307\u5b9a\u3057\u3066\u3082\u52b9\u304b\u306a\u304b\u3063\u305f\u306e\u3067\u3001\u300cVB\u300d\u3068\u6307\u5b9a\u3059\u308b\u3068\u7121\u4e8b\u52b9\u304f\u3088\u3046\u306b\u306a\u308a\u307e\u3057\u305f\u3002\u9577\u304f\u306a\u308a\u307e\u3057\u305f\u304c\u3001\u5207\u308a\u66ff\u3048\u53ef\u80fd\u306a\u30b7\u30fc\u30c8\u4e00\u89a7\u306e\u30b9\u30af\u30ea\u30d7\u30c8\u3067\u3059\u3002<\/p>\n<p>\u5404\u30b7\u30fc\u30c8\u306b\u30c6\u30fc\u30d6\u30eb\u540d\u306e\u7269\u7406\u540d\u3084\u3001MySQL\u306a\u3089DB\u30a8\u30f3\u30b8\u30f3\u306a\u3069\u3092\u8a18\u8f09\u3057\u3066\u3044\u308b\u3068\u4e00\u89a7\u3067\u540c\u69d8\u306b\u751f\u6210\u3067\u304d\u305d\u3046\u3067\u3059\u306d\u3002<\/p>\n<pre lang=\"VB\" line=\"1\">\r\n\r\nOption Explicit\r\n\r\nSub SheetList()\r\n    Dim i As Integer\r\n   \r\n    '\u30c6\u30fc\u30d6\u30eb\u4e00\u89a7\u306e\u958b\u59cb\u4f4d\u7f6e\r\n    Dim x As Integer\r\n    Dim y As Integer\r\n    x = 4\r\n    y = 4\r\n   \r\n    '\u30c6\u30fc\u30d6\u30eb\u4e00\u89a7\u306e\u30b7\u30fc\u30c8\u304c\u4f55\u679a\u76ee\u304b\u3089\u59cb\u307e\u308b\u304b\r\n    Dim offset As Integer\r\n    offset = 2\r\n   \r\n    For i = 1 To Sheets.Count - offset\r\n        Hyperlinks.Add Anchor:=Cells(y + (i - 1), x), Address:=\"\", SubAddress:= _\r\n        Sheets(i + offset).Name + \"!A1\", TextToDisplay:=Sheets(i + offset).Name\r\n    Next\r\n    ActiveCell.EntireColumn.AutoFit\r\nEnd Sub\r\n\r\n\r\nPrivate Sub Worksheet_Activate()\r\n    Call SheetList\r\nEnd Sub\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>\u4ed5\u4e8b\u3067\u5229\u7528\u3057\u3066\u3044\u308b\u30c6\u30fc\u30d6\u30eb\u4e00\u89a7\u306e\u30a8\u30af\u30bb\u30eb\u304c\u3042\u308b\u3093\u3067\u3059\u3051\u3069\u3001\u80a5\u5927\u5316\u3057\u3059\u304e\u3066\u76ee\u7684\u306e\u30c6\u30fc\u30d6\u30eb\u3092\u63a2\u3059\u70ba\u306b\u53f3\u306b\u884c\u3063\u305f\u308a\u5de6\u306b\u884c\u3063\u305f\u308a\u3068\u4e00\u82e6\u52b4\u3060\u3063\u305f\u306e\u3067\u3001\u30b7\u30fc\u30c8\u5207\u308a\u66ff\u3048\u6a5f\u80fd\u306e\u4ed8\u3044\u305f\u30b7\u30fc\u30c8\u4e00\u89a7\u3092\u4f5c\u6210\u3057\u3066\u307f\u307e\u3057\u305f\u3002 \u4f5c &#8230; <a href=\"https:\/\/blog.fukata.org\/archives\/1040\/\"> \u7d9a\u304d\u3092\u8aad\u3080<\/a><\/p>\n","protected":false},"author":2,"featured_media":9223372036854775807,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[1980],"tags":[249,248,250,1082],"_links":{"self":[{"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/posts\/1040"}],"collection":[{"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/comments?post=1040"}],"version-history":[{"count":0,"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/posts\/1040\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/media\/9223372036854775807"}],"wp:attachment":[{"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/media?parent=1040"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/categories?post=1040"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.fukata.org\/wp-json\/wp\/v2\/tags?post=1040"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}