{"id":3273,"date":"2017-11-28T18:08:15","date_gmt":"2017-11-28T09:08:15","guid":{"rendered":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/?p=3273"},"modified":"2017-11-28T18:08:15","modified_gmt":"2017-11-28T09:08:15","slug":"vba%e5%9b%b3%e5%bd%a2%e3%82%92%e7%9c%9f%e4%b8%8b%e3%81%ab%e3%82%b3%e3%83%94%e3%83%bc","status":"publish","type":"post","link":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/2017\/11\/28\/3273\/","title":{"rendered":"VBA:\u56f3\u5f62\u3092\u771f\u4e0b\u306b\u30b3\u30d4\u30fc"},"content":{"rendered":"<div class=\"hl-surround\" ><div class=\"hl-main\"><pre>Sub \u56f3\u5f62\u30b3\u30d4\u30fc\u30c6\u30b9\u30c8() '\u73fe\u5728\u9078\u629e\u3055\u308c\u3066\u3044\u308b\u56f3\u5f62\u3092\u8907\u88fd\u3057\u3001\u771f\u4e0b\u306b\u4f4d\u7f6e\u3055\u305b\u308b\r\n    With Selection\r\n        Dim t, h, l\r\n        '\u73fe\u5728\u306e\u9078\u629e\u56f3\u5f62\u306e\u4f4d\u7f6e\u30fb\u9ad8\u3055\u3092\u4fdd\u5b58\r\n        t = .ShapeRange.Top\r\n        l = .ShapeRange.Left\r\n        h = .ShapeRange.Height\r\n        '\u30b3\u30d4\u30fc\u3057\u3001\u8cbc\u4ed8\u3051\uff08\u3053\u306e\u6642\u70b9\u3067\u9078\u629e\u304c\u8cbc\u4ed8\u3051\u56f3\u5f62\u306b\u5207\u308a\u66ff\u308f\u308b\uff09\r\n        .Copy\r\n        .Paste\r\n        '\u8cbc\u4ed8\u3051\u56f3\u5f62\u306e\u4e0a\u7aef\u3068\u5de6\u7aef\u306e\u5ea7\u6a19\u3092\u5148\u306e\u56f3\u5f62\u306e\u771f\u4e0b\u306b\u6765\u308b\u3088\u3046\u306b\u6307\u5b9a\r\n        .ShapeRange.Top = t + h\r\n        .ShapeRange.Left = l\r\n     End With\r\nEnd Sub<\/pre><\/div><\/div>\n","protected":false},"excerpt":{"rendered":"<p>Sub \u56f3\u5f62\u30b3\u30d4\u30fc\u30c6\u30b9\u30c8() &#8216;\u73fe\u5728\u9078\u629e\u3055\u308c\u3066\u3044\u308b\u56f3\u5f62\u3092\u8907\u88fd\u3057\u3001\u771f\u4e0b\u306b\u4f4d\u7f6e\u3055\u305b\u308b With Selection Dim t, h, l &#8216;\u73fe\u5728\u306e\u9078\u629e\u56f3\u5f62\u306e\u4f4d\u7f6e\u30fb\u9ad8\u3055\u3092\u4fdd\u5b58 t = .ShapeRange.Top l =  [&hellip;]<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"inline_featured_image":false,"footnotes":""},"categories":[1],"tags":[417,420],"_links":{"self":[{"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/posts\/3273"}],"collection":[{"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/comments?post=3273"}],"version-history":[{"count":1,"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/posts\/3273\/revisions"}],"predecessor-version":[{"id":3274,"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/posts\/3273\/revisions\/3274"}],"wp:attachment":[{"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/media?parent=3273"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/categories?post=3273"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/mechsys.tec.u-ryukyu.ac.jp\/~oshiro\/SiteList\/wp-json\/wp\/v2\/tags?post=3273"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}