{"width":"100%","version":"1.0","author_name":"Infoment","image_url":"https://cdn-ak.f.st-hatena.com/images/fotolife/I/Infoment/20190204/20190204223402.png","categories":["Excel","VBA","\u8a66\u3057\u3066\u307f\u305f","\u6b63\u898f\u8868\u73fe","\u5931\u6557\u8ac7"],"provider_name":"Hatena Blog","height":"190","html":"<iframe src=\"https://hatenablog-parts.com/embed?url=https%3A%2F%2Finfoment.hatenablog.com%2Fentry%2F2019%2F02%2F04%2F225558\" title=\"\uff1f\u3092\u307e\u3068\u3081\u3066\u7f6e\u63db\u3059\u308b - Infoment\u306e\u30d6\u30ed\u30b0 \uff5eExcel VBA\u596e\u95d8\u8a18\uff5e\" class=\"embed-card embed-blogcard\" scrolling=\"no\" frameborder=\"0\" style=\"display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;\"></iframe>","title":"\uff1f\u3092\u307e\u3068\u3081\u3066\u7f6e\u63db\u3059\u308b","blog_url":"https://infoment.hatenablog.com/","url":"https://infoment.hatenablog.com/entry/2019/02/04/225558","type":"rich","published":"2019-02-04 22:55:58","blog_title":"Infoment\u306e\u30d6\u30ed\u30b0 \uff5eExcel VBA\u596e\u95d8\u8a18\uff5e","author_url":"https://blog.hatena.ne.jp/Infoment/","provider_url":"https://hatena.blog","description":"\u6628\u65e5\u306f\u3001\u5f53\u30d6\u30ed\u30b0\u3092\u8a2a\u308c\u305f\u65b9\u306e\u691c\u7d22\u30ad\u30fc\u30ef\u30fc\u30c9 \u300cvba \u6b63\u898f\u8868\u73fe \uff1f\u3067\u533a\u5207\u3089\u308c\u305f\u6587\u5b57\u5217 \u62bd\u51fa\u300d \u3092\u5c11\u3057\u3060\u3051\u6398\u308a\u4e0b\u3052\u3066\u3001\u5b9f\u969b\u306b\u6b63\u898f\u8868\u73fe\u3067\u62bd\u51fa\u3059\u308b\u30de\u30af\u30ed\u3092\u8003\u3048\u3066\u307f\u305f\u3002 infoment.hatenablog.com \u305d\u3053\u3067\u4eca\u56de\u306f\u3001\u6628\u65e5\u306e\u7d9a\u304d\u3092\u5c11\u3057\u3060\u3051\u7d39\u4ecb\u3059\u308b\u3002 \uff08\u2191 Canva\u3067\u300c\u4e00\u5ea6\u306b\u300d\u3067\u691c\u7d22\u3057\u305f\u3089\u51fa\u3066\u304d\u305f\u753b\u50cf\u3002\uff09\u3055\u3066\u3001\u6628\u65e5\u306f\u300c\uff1f\u4ee5\u5916\u300d\u3092\u6b63\u898f\u8868\u73fe\u3067\u62bd\u51fa\u3059\u308b\u3053\u3068\u3067\u3001\u6b32\u3057\u3044\u6587\u5b57\u5217\u3060\u3051\u3092\u8868\u793a\u3055\u305b\u3066\u307f\u305f\u3002 Sub \u533a\u5207\u308a\u30c6\u30b9\u30c8_\u6b63\u898f\u8868\u73fe() Dim str As String str = \"A?B?CDE?F\" ' \u6b63\u898f\u8868\u73fe Dim myReg As RegExp Set myReg = New RegE\u2026"}