{"author_url":"https://blog.hatena.ne.jp/shikaku/","description":"Dim addTop Dim addLeft addTop = Range(\"A1\").Top addLeft = Range(\"A1\").Left Dim btn Set btn = Workbooks(\"hoge\u30b7\u30fc\u30c8.xlsm\").Sheets(\"hogehoge\").Buttons.Add(addLeft + 19.5, addTop, 133.5, 37.5) btn.Characters.Text = \"\u30dc\u30bf\u30f3\u540d\" btn.OnAction = \"\u30de\u30af\u30ed\u540d\"","blog_url":"https://blog.systemjp.net/","url":"https://blog.systemjp.net/entry/2020/06/09/121459","blog_title":"shikaku's blog","categories":["ExcelVBA"],"author_name":"shikaku","version":"1.0","provider_name":"Hatena Blog","type":"rich","provider_url":"https://hatena.blog","title":"ExcelVBA\u3067\u6307\u5b9a\u306e\u30b7\u30fc\u30c8\u306b\u30d5\u30a9\u30fc\u30e0\u30dc\u30bf\u30f3\u3092\u8ffd\u52a0\u3059\u308b","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fblog.systemjp.net%2Fentry%2F2020%2F06%2F09%2F121459\" title=\"ExcelVBA\u3067\u6307\u5b9a\u306e\u30b7\u30fc\u30c8\u306b\u30d5\u30a9\u30fc\u30e0\u30dc\u30bf\u30f3\u3092\u8ffd\u52a0\u3059\u308b - shikaku&#39;s blog\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","published":"2020-06-09 12:14:59","image_url":null,"width":"100%","height":"190"}