{"type":"rich","blog_url":"https://effect.hatenablog.com/","author_name":"moko_03_25","version":"1.0","image_url":null,"blog_title":"\u30b2\u30fc\u30e0\u30a8\u30d5\u30a7\u30af\u30c8\u30c7\u30b6\u30a4\u30ca\u30fc\u306e\u30d6\u30ed\u30b0 | A Real-Time VFX Artist's Blog","title":"\u30a8\u30af\u30bb\u30eb\u3067\u4fbf\u5229\u306aVBA\u30de\u30af\u30ed\u306e\u30e1\u30e2","width":"100%","author_url":"https://blog.hatena.ne.jp/moko_03_25/","height":"190","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Feffect.hatenablog.com%2Fentry%2F2016%2F08%2F26%2F021608\" title=\"\u30a8\u30af\u30bb\u30eb\u3067\u4fbf\u5229\u306aVBA\u30de\u30af\u30ed\u306e\u30e1\u30e2 - \u30b2\u30fc\u30e0\u30a8\u30d5\u30a7\u30af\u30c8\u30c7\u30b6\u30a4\u30ca\u30fc\u306e\u30d6\u30ed\u30b0 | A Real-Time VFX Artist&#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>","categories":["Hidemaru \uff06 Excel"],"published":"2016-08-26 02:16:08","description":"\u30a8\u30af\u30bb\u30eb\u306eVBA\u3067\u4fbf\u5229\u306a\u8a18\u8ff0\u306e\u5099\u5fd8\u9332\u3002\u6a19\u6e96\u64cd\u4f5c\u3067\u3067\u304d\u308b\u7bc4\u56f2\u306a\u3089\u30de\u30af\u30ed\u306e\u8a18\u9332\u3067\u3042\u308b\u7a0b\u5ea6\u306a\u3093\u3068\u304b\u306a\u308a\u307e\u3059\u306d\u3002\u3002 A1\u304b\u3089A\u5217\u306e\u6700\u4e0b\u884c\u306e\u7bc4\u56f2 A\u5217\u306e1\u884c\u76ee\u304b\u3089A\u5217\u3067\u4f55\u304b\u8a18\u5165\u3057\u3066\u3044\u308b\u6700\u4e0b\u884c\u306e\u7bc4\u56f2\u3092\u8868\u3059\u5834\u5408\u3002 Range(\"A1\", .Range(\"A\" & .Rows.Count).End(xlUp)) \u30c7\u30fc\u30bf\u30b5\u30a4\u30ba\u306e\u30d0\u30a4\u30c8\u8868\u8a18\u3092KiB\u8868\u8a18\u306b\u3059\u308b A\u5217\u306b\u30c7\u30fc\u30bf\u30b5\u30a4\u30ba\u304c\u4e26\u3093\u3067\u3044\u3066B\u5217\u306bKiB\u8868\u8a18\u306b\u3057\u305f\u3044\u3068\u304d\u306f\u3053\u3061\u3089\u3002 ' A\u5217\u30921024\u3067\u5272\u3063\u305f\u3082\u306e\u3092B\u5217\u306b\u5165\u308c\u308b Range(\"B1\").Select ActiveCell.FormulaR1C1 = \"=RC[-1]/1024\" Range(\"B1\").\u2026","url":"https://effect.hatenablog.com/entry/2016/08/26/021608","provider_name":"Hatena Blog","provider_url":"https://hatena.blog"}