{"provider_url":"https://hatena.blog","provider_name":"Hatena Blog","blog_url":"https://airplant.hatenadiary.org/","url":"https://airplant.hatenadiary.org/entry/20070614/1181846869","height":"190","version":"1.0","width":"100%","categories":["Excel"],"image_url":null,"description":"Excel\u306e\u8cea\u554f*1\u304c\u3042\u3063\u305f\u306e\u3067\u3001\u7b54\u3048\u3088\u3046\u3068\u3057\u3066\u306f\u307e\u3063\u3066\u3057\u307e\u3044\u307e\u3057\u305f\u3002Function\u30bf\u30a4\u30d7\u306e\u30de\u30af\u30ed\u3092\u66f8\u304f\u3068\u3001Excel\u304b\u3089\u306f\u666e\u901a\u306e\u95a2\u6570\u3068\u540c\u3058\u3088\u3046\u306b\u898b\u3048\u307e\u3059\u3002 \u56de\u7b54\u3067\u3001\u3053\u306e\u95a2\u6570\u3092\u66f8\u3044\u305f\u306e\u3067\u3059\u304c\u3001\u306a\u305c\u304b\u5225\u30b7\u30fc\u30c8\u306b\u5024\u304c\u3042\u308b\u3068\u81ea\u52d5\u66f4\u65b0\u3055\u308c\u306a\u3044\uff01 Option Explicit Public Function Eval(eValStr As String) As Variant If TypeName(Application.Caller) <> \"Range\" Then Exit Function Else Eval = Evaluate(eValStr) End If End Function \u4ed5\u2026","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fairplant.hatenadiary.org%2Fentry%2F20070614%2F1181846869\" title=\"Evalute\u306e\u602a - Shu\u306e\u3064\u307e\u305a\u304d\u65e5\u8a18\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","title":"Evalute\u306e\u602a","published":"2007-06-14 03:47:49","type":"rich","author_name":"airplant","blog_title":"Shu\u306e\u3064\u307e\u305a\u304d\u65e5\u8a18","author_url":"https://blog.hatena.ne.jp/airplant/"}