{"blog_title":"end0tknr's kipple - web\u5199\u7d4c\u958b\u767a","categories":["vba"],"author_url":"https://blog.hatena.ne.jp/end0tknr/","provider_url":"https://hatena.blog","version":"1.0","title":"vba\u306e\u6b63\u898f\u8868\u73fe\u3067\u30ad\u30e3\u30d7\u30c1\u30e3\u3059\u308b\u306b\u306f?","image_url":null,"published":"2010-11-30 18:06:18","type":"rich","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Fend0tknr.hateblo.jp%2Fentry%2F20101130%2F1291107978\" title=\"vba\u306e\u6b63\u898f\u8868\u73fe\u3067\u30ad\u30e3\u30d7\u30c1\u30e3\u3059\u308b\u306b\u306f? - end0tknr&#39;s kipple - web\u5199\u7d4c\u958b\u767a\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","provider_name":"Hatena Blog","width":"100%","description":"\u6b21\u306e\u3088\u3046\u306b\u66f8\u304f\u3068\u3001\u3088\u3044\u307f\u305f\u3044 Dim re as Object Dim mc as Object Dim m as Object Dim i as long '\u6b63\u898f\u8868\u73fe\u30aa\u30d6\u30b8\u30a7\u30af\u30c8 Set re = CreateObject(\"VBScript.RegExp\") '\u30d1\u30bf\u30fc\u30f3\u6307\u5b9a 'refer to\uff1ahttp://msdn.microsoft.com/ja-jp/library/ms974570.aspx re.Pattern = \"(\u3082{2})\" '\u8907\u6570\u30de\u30c3\u30c1\u6709\u52b9(perl\u306eg\u30aa\u30d7\u30b7\u30e7\u30f3\uff09 re.Global = True Set mc = re.Execute(\"\u3059\u3082\u3082\u3082 \u3082\u3082\u3082 \u3082\u3082\u306e\u3046\u3061\u2026","url":"https://end0tknr.hateblo.jp/entry/20101130/1291107978","author_name":"end0tknr","blog_url":"https://end0tknr.hateblo.jp/","height":"190"}